I have a for/next loop such as this...

On Error Resume Next
i = 5
For col = 1 To 7 Step 2
AppPerWS.Range(Cells(30, col), Cells(54, col)).Copy
AppendWS.Range("A" & i).PasteSpecial Paste:=xlPasteValues, _
Operation:=xlNone, _
SkipBlanks:=False, _
Transpose:=True
Application.CutCopyMode = False
i = i + 1
Next col

The problem is that an compile error pops up that says "variable not
defined" I didn't think you had to define these...do you?

Any clue??