Referans Veriye Göre Sayfa Adı Oluşturmak

[baydeniro]

Merhaba arkadaşlar, forumda aradım bulamadım. Yardımcı olursanız sevinirim. Referans veriye göre sayfa adını tanımlayan bir makro veya bir fonksiyon olabilir mi ? Bir programdan excele gönderilen veriyi kullanarak sayaf adının otomatikman yazılması.

Not : Macro'yu button'a bağyamadım. Kusurma bakmayın. Macro adı : SAYFA_ADI

 

[Levent Menteşoğlu]

Aşağıdaki kodu sayfanın kod sayfasına kopyalayın. Sayfada I1 hücresindeki veri değiştiğinde kod kendiliğinden çalışarak sayfa adını değiştirecektir. Yalnız sayfa adındaki karakter sayısı 31 den fazla olamaz buna dikkat edin.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$I$1" Then Exit Sub
ActiveSheet.Name = "R_FIS_DETAY_RAPOR _" & [I1] & "_" & [J1]
End Sub

 

[baydeniro]

Teşekkür

Valla ne diyeyim sayın leventm, Allah sizleri bu vatana bağışlayan ailenize ve yetişmenize katkıda bulunanlara çok teşekkürler. Sizler gibi yeteneklerin var olduğunu gördükçe Türk olmaktan duyduğum gurur daha da artmakta. Çok teşekkürler çok süper bir kod.