Aktif hücrenin değerini formülle almak

[agent1980]

İnternet explorerda selection change makrosu çalışmıyor

Merhaba;

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
adres = ActiveCell.Address

Range("e3").Value = Range(adres).Value

End Sub

makrosu, internet explorer üzerinden excel dosyası açıldığında direk mouse ile seçim yapıldığında çalışıyor fakat, kullanıcı CTRL F ile arama yaptığında hücre seçimi değişmesine rağmen makro işlevini yerine getirmiyor.
Bu sorunu nasıl çözebiliriz acaba...

 

[agent1980]

Merhaba tekrar;

iki tane dosya ekledim. xls ve doc dosyası. Doc dosyasını web sayfası olarak kayıt edip linkten excel dosyasını internet explorer içinde açarak sorunu görebilirsiniz. Mouse ile seçim yapıldığında selection change olayı açlışıyor Ctrl + F ile arama yaptığımda hücre seçimi değişiyor ama maro çalışmıyor. Arama penceresini kapatıp ayrıca mouse ile tekrar seçim yapmak gerekiyor.
Kusura bakmayın bir kaç defa yazdım ama çok gerekli
direk int explorer dosyasının upload edemediğim için doc dosyası olarak gönderdim.