• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

userforma sıte linki ekleme

Katılım
6 Mayıs 2007
Mesajlar
65
Excel Vers. ve Dili
excell 2003 ıngılızce
arkadaslar merhaba
sıtede aradım bulamadım userforma nasıl site linki ekleyebilirim
belkıde cok basıt bır soru ama ınsan bılmeyınce cok zor gelıyor
yardımlarınız ıcın tesekkurler
 
Bu şekilde deneyiniz.
Kod:
Sub Düğme1_Tıklat()
On Error Resume Next
ActiveWorkbook.FollowHyperlink Address:="http://www.excel.web.tr"
End Sub
 
Ya da;

Kod:
Set IE = CreateObject("InternetExplorer.Application")

With IE
    .navigate "www.excel.web.tr"
    .Visible = True
End With

Set IE = Nothing
 
Sub Düğme1_Tıklat()
ActiveWorkbook.FollowHyperlink Address:="http://www.excel.web.tr", NewWindow _
:=False, AddHistory:=True
End Sub
 
Geri
Üst