variable not defined

[earp_]

Hi,
I have this structure:

Sub macro()

Dim columnSheet2 As range


With ThisWorkbook
Set valueCell = .Sheets("sheet1").range("B2")
Set timeCell = .Sheets("sheet1").range("J2")
End With

If timeCell.Text <> "#N/A" Then


myHour = Hour(timeCell)
myMinute = Minute(timeCell)

'#######################
If (myHour = 5) Then
If (myMinute = 0) Then
Set columnSheet2 = A65536

...

if I run it it gives me an error here

Set columnSheet2 = A65536

saying variable not defined, why?

 

[earp_]

Perfect thanks

 

[earp_]

I can do also something like

Set columnSheet2 = Range("A65536")

then

Worksheets("Sheet2").columnSheet2.End(xlUp).Offset(1, 0).PasteSpecial xlValues

just found out this

 

[RoryA]

This:

Worksheets("Sheet2").columnSheet2.End(xlUp).Offset(1, 0).PasteSpecial xlValues

should be:

columnSheet2.End(xlUp).Offset(1, 0).PasteSpecial xlValues

 

[earp_]

great thanks