C
carl
Is there a way to have the macro below repeat itself using values in cell
G10:G20 ?
Sheets("Sheet2").Select
'need a way to take the value in G10, then G11,...G20
Selection.Copy
Range("A3").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Calculate
Range("A3").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("Sheet1").Select
Range("A4").Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Range("A1").Select
ActiveSheet.Paste
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Thank you in advance.
G10:G20 ?
Sheets("Sheet2").Select
'need a way to take the value in G10, then G11,...G20
Selection.Copy
Range("A3").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Calculate
Range("A3").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("Sheet1").Select
Range("A4").Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Range("A1").Select
ActiveSheet.Paste
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Thank you in advance.