Sayfa adını nasıl değiştirebilirim.

[AS3434]

A1 hücresine yazmış olduğum veriyi "Sayfa Adı " olarak nasıl ayarlayabilirim?

 

[Kemal Demir]

Sayfa Adını verir
Sub SayfaAdı()
ActiveSheet.name=Range("a1").value
End Sub

A1 Hücresine Sayfa ismini verir
Sub Hücreadı()
Range("a1").value=ActiveSheet.name
End Sub

 

[AS3434]

Sn. rakkas
İlginiz için teşekkür ederim.
Yalnız butona bağlı kalmadan, hücreye veriyi girdiğim zaman otomatik sayfa adını değiştirebilirmiyiz?
Sevgilerle

 

[Kemal Demir]

Sn.AS3434

Ek'teki Örneği İnceleğiniz

 

[AS3434]

Teşekkür ederim sn. Rakkas