Hello all,

I've been working on a macro that combines raw data files. I'm only interested in certain columns of data within the raw files that can be in any order. I've used the following code to copy column data into my worksheet. 

 
    co1 = WorksheetFunction.Match("*" & "Loan" & "*", Rows("1:1"), 0)
    co3 = WorksheetFunction.Match("*" & "Past" & "*", Rows("1:1"), 0)

    LR = ShtSource.Cells(Rows.Count, co1).End(xlUp).Row
    LR2 = ShtTarget.Cells(Rows.Count, "A").End(xlUp).Row
    ShtTarget.Cells(LR2 + 1, "A").Resize(LR - 1, 1).Value = ShtSource.Cells(2, co1).Resize(LR - 1, 1).Value
        
    

    LR = ShtSource.Cells(Rows.Count, co3).End(xlUp).Row
    LR2 = ShtTarget.Cells(Rows.Count, "C").End(xlUp).Row
    ShtTarget.Cells(LR2 + 1, "C").Resize(LR - 1, 1).Value = ShtSource.Cells(2, co3).Resize(LR - 1, 1).Value
The problem is not all the columns are fully populated depending on the data and blanks get filled while looping through workbooks and misalign data.

Is there a way I can loop through rows of a worksheet, if they contain some type of data, copy only those fields that match the column headings I want for that row (blanks are fine)? Data from the next workbook should start on the next row even if column A for example has 15 entries and column B has 20.

This is basically starting the macro on a new slate for me, any help is most appreciated!!!