copy column different sheet vba

October 31, 2011 at 07:20:27
Specs: Windows 7
I would like to copy column "C" from sheet 1 to column G in sheet 2 if values in column "A" are equal to x.

This is what I have so far...

Sub Copycol()

Sheets("Sheet1").Select
Range("c1:c7").Copy
Sheets("Sheet2").Select
Range("G51:G12").Select
ActiveSheet.Paste

End Sub


See More: copy column different sheet vba

Report •

#1
October 31, 2011 at 07:35:35
I have tried this but nothing happens

Sub Copycol()
Dim i As Long
Sheets("Sheet1").Select

For i = 1 To i = 7
If (Cells(i, 3).Value = "F2000") Then
Range("e1:e7").Copy
Sheets("Sheet2").Select
Range("G3:G10").Select
ActiveSheet.Paste
End If
Next i

End Sub


Report •
Related Solutions


Ask Question