Hata nerede?

[Tevfik_Kursun]

Merhaba Arkadaşlar,

Private Sub CommandButton1_Click()
    Sheets("Goster").Visible = True
    Sheets("Goster").Activate
    Sheets("Goster").Select
    [COLOR="Red"]Range("AT8").Select[/COLOR]
End Sub

Yukarıdaki satırlar çalışmamın bazı sayfalarında sorunsuz çalışıyor, bazı sayfalarda Run-time error "1004" deyip duruyor. "Range sınıfının select yöntemi başarısız" diye ekliyor.
Neden olabilir?
Saygılarımla

 

[ÖmerBey]

Şu şekilde deneyiniz:

Sheets("Goster").Range("AT8").Select

 

[numan şamil]

Merhaba Arkadaşlar,

Private Sub CommandButton1_Click()
    Sheets("Goster").Visible = True
    Sheets("Goster").Activate
    Sheets("Goster").Select
    [COLOR="Red"]Range("AT8").Select[/COLOR]
End Sub

Yukarıdaki satırlar çalışmamın bazı sayfalarında sorunsuz çalışıyor, bazı sayfalarda Run-time error "1004" deyip duruyor. "Range sınıfının select yöntemi başarısız" diye ekliyor.
Neden olabilir?
Saygılarımla

Private Sub CommandButton1_Click()
    Sheets("Goster").Visible = True
    Sheets("Goster").Activate
    Sheets("Goster").Range("AT8").Select
End Sub

 

[Tevfik_Kursun]

Harikasınız, hepinize teşekkür ediyorum.
Saygılarımla