Need a macro to copy down the value in the cell until the next value, then again

ok, so the file is structured as per below - Column A is far left. This hasn't copied properly and the ZZZ codes are in column B, the cells in column A next to those codes is currently blank.

In this example I want to populate below 'AL' down to where the next Code 'LWOP' starts,
and so on and so on, until it reaches the last code. It doesn't matter if blank rows get populated i.e. the cell immediately above the second instance of
each code, as I'm making the data read accross to cells in columns to the right of those shown below, and will filter on a related value cell (not shown) to
remove any nil values. I hope that makes sense.

____________________________________________________
Data Dump Zone - Income & Allowances

Attache COMPANY
DATE INCOME TYPE REPORT Page: 1
For Date Paid 01/11/2016 to 30/11/2016

Code

AL ANNUAL LEAVE
ZZZ1 NAME1
ZZZ2 NAME2
ZZZ3 NAME3

AL ANNUAL LEAVE


LWOP Leave Without Pay
ZZZ1 NAME1
ZZZ2 NAME2
ZZZ3 NAME3

LWOP Leave Without Pay

etc ...

___________________________________________