- Katılım
- 4 Mayıs 2007
- Mesajlar
- 234
- Excel Vers. ve Dili
- office 2007 64 bit
office 2010 64 bit
Oluşturduğum bir dosyanın köprüsüne her tıkladığımda bu mesajı geliyor.
Kendi bilgisayarımda güvenilir bir kaynak olduğumu düşünüyorum. Sürücüyü güvenilir bir konum olarak eklemeyi denedim.
Bir kayıt defteri girişi oluşturmayı denedim: Computer\HKEY_CURRENT_USER\Software\Microsoft\Office\12.0\Common\Security
DWORD = DisableHyperlinkWarning ve değeri 1 olarak ayarlayın.
Benim için hiçbir şey işe yaramadı.
Başka bir fikri olan var mı ?
Bir de ben zaten bu dosyayı bir buton a tıkladığımda çağırıyorum Yalnız aşşağıdaki kodda gelen mesaja On Error Resume Next ten sonra Tamam ı tıkla diye bir kod ekleyebilirsek olur mu aceba.
Sub sarkı1()
Dim fileaudio As String
On Error Resume Next
fileaudio = "C:\.........................................wav"
ActiveWorkbook.FollowHyperlink Address:=fileaudio
End Sub
Kendi bilgisayarımda güvenilir bir kaynak olduğumu düşünüyorum. Sürücüyü güvenilir bir konum olarak eklemeyi denedim.
Bir kayıt defteri girişi oluşturmayı denedim: Computer\HKEY_CURRENT_USER\Software\Microsoft\Office\12.0\Common\Security
DWORD = DisableHyperlinkWarning ve değeri 1 olarak ayarlayın.
Benim için hiçbir şey işe yaramadı.
Başka bir fikri olan var mı ?
Bir de ben zaten bu dosyayı bir buton a tıkladığımda çağırıyorum Yalnız aşşağıdaki kodda gelen mesaja On Error Resume Next ten sonra Tamam ı tıkla diye bir kod ekleyebilirsek olur mu aceba.
Sub sarkı1()
Dim fileaudio As String
On Error Resume Next
fileaudio = "C:\.........................................wav"
ActiveWorkbook.FollowHyperlink Address:=fileaudio
End Sub
