Autofilter with offset

[camandab]

Hello, I'm attempting to copy data between workbooks. I'm not sure if this method is the most efficient but the columns in the workbooks are not in the same order so I am copying one at a time.

When I execute this code, it is copying 2 columns at a time instead of 1. I can't figure out why. If I can figure out how/why it is copying 2 columns instead of 1, then I can figure out how to do multiple columns at a time in the future, if needed. Thanks in advance for the help!

With L3sheet
    .AutoFilterMode = False
    With Range("A1", Range("B" & Rows.Count).End(xlUp))
        .AutoFilter 1, "=" & CoCode
        .AutoFilter 2, "=" & Account
        On Error Resume Next
        .Offset(1, 3).SpecialCells(12).Copy Destination:=ws.Cells(lastA, 2).Offset(14, 0)   
        .Offset(1, 2).SpecialCells(12).Copy Destination:=ws.Cells(lastA, 3).Offset(14, 0)   
        On Error GoTo 0
        End With
        End With

 

[Jonmo1]

Because the range you have offset from is a 2 column range

With Range("A1", Range("B" & Rows.Count).End(xlUp)) 'This is 2 columns A:B
.Offset(1, 3).SpecialCells(12).Copy


Offset just moves over the specified rows and columns, does not alter the size/shape of the originally referenced range...

Try

.Offset(1, 3).Resize(, 1).SpecialCells(12).Copy

 

[camandab]

Thanks very much! That explains exactly what I needed.