Selecting Range Help

[segran]

Hi,

I have this code:

Sub Test()
'
' Test Macro
'
' Keyboard Shortcut: Ctrl+t
'
Dim i As Integer
Dim temp As String


i = 2
For i = 2 To 28

Sheets(i).Select

Range("O5:O28").Select
Selection.Copy
ActiveWindow.ScrollWorkbookTabs Position:=xlLast
Sheets("Sheet3").Select
temp = "A" + Str(i * 24)
Range("A" + Str((i * 24)) + 1).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

Next i
End Sub


As it goes through each sheet, I want the results pasted in the same column, after the previous numbers that was pasted.

There is something wrong I am going with Range.

Please help.

Thanking you in advance.

 

[andylawson5]

I think your range should be (i.e. & instead of +):

Range("A" & Str((i * 24)) + 1).Select