J
Journey
I have the following macro that copies the value that in in cell A3 on the
EEInfo ws, pastes it to WOACreate worksheet and then print the WOACreate
worksheet.
What I want it to do is loop through all the values that are in column A on
the EEInfo worksheet starting with cell A3. there is other columns on the
worksheet, but I only want the values from each cell in column Acopied and
pasted onto the WOACreate worksheet and then printed before continuing.
Can anyone help with the looping. thanks in advance.
Sub Macro2()
Sheets("EEInfo").Select
Range("A3").Select
Selection.Copy
Sheets("WOACreate").Select
Range("C2").Select
Selection.PasteSpecial Paste:=xlPasteValues, _
Operation:=xlNone, SkipBlanks :=False, Transpose:=False
Application.CutCopyMode = False
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
EEInfo ws, pastes it to WOACreate worksheet and then print the WOACreate
worksheet.
What I want it to do is loop through all the values that are in column A on
the EEInfo worksheet starting with cell A3. there is other columns on the
worksheet, but I only want the values from each cell in column Acopied and
pasted onto the WOACreate worksheet and then printed before continuing.
Can anyone help with the looping. thanks in advance.
Sub Macro2()
Sheets("EEInfo").Select
Range("A3").Select
Selection.Copy
Sheets("WOACreate").Select
Range("C2").Select
Selection.PasteSpecial Paste:=xlPasteValues, _
Operation:=xlNone, SkipBlanks :=False, Transpose:=False
Application.CutCopyMode = False
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub