Seçilen Resmin Tanımını Hücreye Yazdırmak

[baydeniro]

Merhaba Arkadaşlar,
Şöyle bir durum olsa. Excel sayfasında birkaç resim var. Resmi işaretleyici ile seçince, seçilen resmi tanımını (örneğin Picture 17) A1 hücresine Picture 17 şeklinde yazdırmak mümkün müdür ?

 

[Seyit Tiken]

Bu şekilde deneyiniz.

[a1] = Selection.ShapeRange.Name

 

[baydeniro]

Bu şekilde deneyiniz.

[a1] = Selection.ShapeRange.Name

Üstad çok teşekkür ederim, harika bir kod. Sağlıcakla kalın.