macro beginner error

Hi, I'm a complete macro noob. but i think I've got this worked out, at least in principle. I'm trying to use a value in Sheet1.Range("A1") to move to a certain row in Sheet2 and add a value. this is my code so far:

Sub test()
'
' test Macro
' Macro recorded 11/27/2007 by none
'

'
Dim y As Integer
y = ActiveSheet.Range("A1").Value
Sheets("Sheet2").Select
ActiveSheet.Range.Cells(y, 1) = "some value"
End Sub

I get an error on the last line : ActiveSheet.Range.Cells(y, 1) = "some value"

does anyone have any insight on to what is going wrong.

Thank you

I got it working by omitting ActiveSheet.Range. from the last line

for anyone interested in this topic. this works

Sub test()
'
' test Macro
' Macro recorded 11/27/2007 by none
'

'
Dim y As Integer
y = ActiveSheet.Range("A1").Value
Sheets("Sheet2").Select
Cells(y, 1) = "some value"
End Sub

the tutorial i have been reading says the following:

The following three statements are interchangable

ActiveSheet.Range.Cells(1,1)
Range.Cells(1,1)
Cells(1,1)

why did the code not work with the full path name? any insight is appreciated

thanx