Macro for creating column headings and coping data into these cells

Hi

I need a macro that will create 4 headings in the following columns

T2 = column and cell

T2: Istenant U2: IsorderNone V2: IsorderRef W2:IsOrderforOther

I then need the macro to copy data from the same spreadsheet and place the corresponding data into the above columns. I need to specify the columns where the data lives in which I need to copy from, not the range. E.g. T2:T500 – it needs to be based on the column..e.g. T:T

Important: I need the macro to stop inputting data at the last line of data from where its copying from.

Please advise, much appreciated

Thanks

Hi sorry

Copying from columns J:J K:K L:L M:M

Hi please see file attached. I have explained differently in column R

Hi, the 0 doesn't mean there's no content on the left. There just needs to be 0's in that column. But we only want the cells to be filled with 1's and 0's if there there is content on the left

The columns with 0's and 1's doesn't mean anything, however they need to remain the same. I just want the 1's to be entered where there is content on the left and 0's also. T U V and W only need to be filled in if the other cells to the left have content in them

Hi sorry about the confusion. I have just checked the spreadsheet.

If row Q has data in it, then cell T and U needs to have a 1 inputted and V and W needs to have a 0 inputted.

If there is no data in row Q, then nothing should be entered into these cells.

I hope this is enough info