Hyperlink olan hücreleri saydırmak

[Excellor]

Merhaba,

Bir sheet içinde (herhangi bir dosyaya) Hyperlink verilmiş hücreleri nasıl saydırabilirim ? Hyperlinki olan hücreleri say şeklinde, COUNTIF ile bunu yapmanın bir yolu olabilir mi ?

Teşekkürler,

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu denermisiniz.

Sub HYPERLİNK_SAY()
    MsgBox ActiveSheet.Hyperlinks.Count
End Sub

 

[Excellor]

Selamlar,

Aşağıdaki kodu denermisiniz.

Sub HYPERLİNK_SAY()
    MsgBox ActiveSheet.Hyperlinks.Count
End Sub

Çok teşekkürler Korhan Bey, istediğim buydu.

Bu hesaplamayı tüm sheet yerine seçilecek hücreler için de yapabilir miyiz ? A1:G1 içinde hyperlink olanlar gibi..

 

[abdi]

range değişkenini kullanarak istediğiniz sonucu almaınız olası gibi gözüktü bana

 

[Excellor]

Çok teşekkürler Korhan Bey, istediğim buydu.

Bu hesaplamayı tüm sheet yerine seçilecek hücreler için de yapabilir miyiz ? A1:G1 içinde hyperlink olanlar gibi..

Bunu Rows() ile çözdüm ancak asıl sorun sayım yaparken yaşanıyor. Eğer hücreler tek tek seçilip hyperlink verilmişse toplamı doğru buluyor ama örneğin iki hücre birlikte seçilip aynı dosyaya hyperlink verilmişse bunu 2 olarak değil 1 olarak hesaplıyor. Kullandığım sheet üzerinde birden fazla hücreye aynı dosyayı hyperlink veriyorum. Bunu yaparken de teker teker değil toplu seçim yapıyorum. Dolayısıyla bu mantıkla istediğim rakamı elde edemiyorum malesef..