I have been doing some more tinkering with my attempted macro.
Although I may be a bit closer, I still need some help... Anyone have
any insights? I'd really appreciate it! Thank you.
*************************************************************
Range("A20:AL27").Select 'Update later with actual range
Do While ActiveCell.Value > 0
Call moveNext 'Calls sub-routine
Loop
End Sub
Sub moveNext()
' macro to copy/paste special selected cell X nubers of time. Then
move to next line item.
'
Dim i As Integer
Dim counter As Integer
Dim freq As Integer
Range(0, 1).Select = freq 'Trying to assing the contents in
column A as the # of times to copy/past. This does not work
counter = 0
Selection.Copy
Do While counter <= freq
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
ActiveCell.Offset(0, 1).Select
counter = counter + 1
Loop
ActiveCell.Offset(1, 1).Select
'
End Sub