Şekillere Köprü Atama

[purutdu]

Merhabalar.
Sayfa üzerinde makro ile yapılan bir şekil var. Bu şekile makro ile (sayfa1) adında köprü atamak istiyorum. Yani sayfada bir buton olacak ve köprü ile başka bir sayfaya geçiş verebilecek. Ben makro kaydet ile yaptığımda köprü verdiğim sayfanın adresi gözükmüyor.
Yardımcı olabilir misiniz?

 

[purutdu]

ActiveSheet.Hyperlinks.Add Anchor:=ActiveSheet.Shapes(ad), Address:="", SubAddress:="'" & ad & "'" & "!A1"

bu sayfada bulamadım yada ben yeterince incelememişim. burada da paylaşayım belki benim gibi ihtiyacı olan birileri çıkar. yabancı bir sayfada şöyle bir kod buldum. "ad" benim köprü yapacağım sayfanın ismi. saydanın ismi ile şeklin ismi aynı olacağı için iki yerde de "ad " yazılı. yani demek istiyor ki ad isimli şekille ad isimli sayfanın köprüsünü ata