tıklandığında adı gelsin

[yucel baygul]

ekteki dosyada üzerine tıkladığım nesnenin adının gelmesini istiyorum.
ilgilenenler teşekkürler.

 

[Necdet]

Merhaba,

İlk aklıma gelen çözüm, bayraklara makro atamak. Daha kısa yolu vardır diye hissediyorum ama şimdilik sadece bir his

Sub Türkiye()
Sheets("Sayfa1").[B15] = "TÜRKİYE"
End Sub

Sub English()
 Sheets("Sayfa1").[B15] = "ENGLISH"
End Sub

Sub China()
 Sheets("Sayfa1").[B15] = "CHINA"
End Sub

 

[yucel baygul]

sn Necdet Yeşertener ilginize çok teşekkürler. sanırım başka çözüm yok. bu şekilde bi çözümde uygundur.