I have a template that copy and pastes values/cell formats to 11 columns (11 columns = 1 printed page), offsets the activecell by 11 and does it again for as long as I want. The first column being text. The problem I have is that the 11 columns reference another worksheet that is formatted to 10 columns. I attempted a for loop to offset by 2 to skip the text column however the formula skips 2 as well (A1 changes to C1) when I need it to go (A1 to B1) although it is moving over 2 cells.
Range("B12").Select
selection.Copy
Dim sample As Integer
For sample = 1 To Range("E5").Value
If sample Mod 10 = 0 Then
ActiveSheet.Paste
ActiveCell.Offset(0, 2).Select
Else
ActiveSheet.Paste
ActiveCell.Offset(0, 1).Select
End If
Next sample
Range("B12").Select
selection.Copy
Dim sample As Integer
For sample = 1 To Range("E5").Value
If sample Mod 10 = 0 Then
ActiveSheet.Paste
ActiveCell.Offset(0, 2).Select
Else
ActiveSheet.Paste
ActiveCell.Offset(0, 1).Select
End If
Next sample