Bağlantı yapılan şekil seçildikten sonra biçim renginin değişmesi

[sukruyilmaz1]

Merhabalar Değerli Uzmanlarım,

Ekli örnekte birkaç tane şekle bağlantı uyguladım ve ilgili sayfalara köprüledim. O şekle tıklayınca mevcut renginin değişmesini nasıl sağlayabiliriz?
Böylece o sayfaya gittiğim belli olsun istiyorum.
Şimdiden çok teşekkür ederim,
Saygılarımı sunarım,

 

[recepkull]

Makro ile yapabilirsiniz.

Sub Hover()
    With ActiveSheet.Shapes("Dikdörtgen: Köşeleri Yuvarlatılmış 1")
        .Fill.ForeColor.RGB = RGB(255, 0, 0)
    End With
    Sheets("Düşeyara ile Sola Arama").Select
End Sub

 

[sukruyilmaz1]

Recep Bey teşekkür ederim çözümünüz için renk değişimi olmadı. Extra bir işlem mi gerekiyor acaba

 

[recepkull]

Şekillerdeki köprüleri kaldırıp makro atamanız gerekiyor.