vba請教，關於range方法

小弟我因為工作的關係寫了一個簡易的功能vba
一直試一直試
找出來bug在哪
但是無法解決...
所以就來這裡請教高手了
錯誤的程式碼主要大置上如下



在sheet1設置一個active x按鈕(紅色字是重點)
Private Sub CommandButton1_Click()
y=2
x=10
range(cells(y,y),cells(x,x)).value="abc"
end sub

以上是ok的

以下就不行了
Private Sub CommandButton1_Click()
y=2
x=10
sheets(2).range(cells(y,y),cells(x,x)).value="abc"
end sub

或

Private Sub CommandButton1_Click()
y=2
x=10
sheets(2).activate
sheets(2).range(cells(y,y),cells(x,x)).value="abc"
end sub

而下面這個則是range sheet1了 = =

Private Sub CommandButton1_Click()
y=2
x=10
sheets(2).activate
range(cells(y,y),cells(x,x)).value="abc"
end sub

range在別的sheet就是不行= =
一直找不到該怎麼弄

高手教教我啊