String Değişkenini ActiveSheet.Name Tanımlama

[stirra_ej]

Değerli arkadaşlar işin mantığını kavramam açısından size bir soru sormak istiyorum.. Aşağıdaki kodun hata verme nedeni nedendir acama. Bunu bana basit bir şekilde izah edebilirmsiniz... Syf isimli bir değişken atıyorum.. Aktif sayfanın adını da değişkene tanımlıyorum.. Nedir bu kodun hata verme sebebi.. Nerde hata yapıyorum..


Sub sayfaismi()
Dim Syf As String
ActiveSheet.Name = Syf
End Sub

 

[Ömer]

Merhaba,

Syf = ActiveSheet.Name

Olarak düzelterek deneyin.

 

[stirra_ej]

Ömer Hocam çok özür dilerim eklediğim konuyu kaldıramıyorum sizi gereksiz gere meşkul ettim Syf değişkenini tanımladım ama Syf değişkenine herhangi bir değer atamadım.. Kodu aşağıdaki gibi değiştirince sorun ortadan kalktı..
Sizin çözüm sunduğunuz örneğide inceledim, sayfa adını değişkene tanımlıyor.. Çok teşekkür ediyorum ...

Sub sayfaismi()
Dim Syf As String
Syf = "Deneme Sayfası"
ActiveSheet.Name = Syf
End Sub