Explorer Tarayıcısı Açmak

[Seyit Tiken]

Arkadaşlar Herkese Hayırlı Günler,
Excel üzerinde "Explorer" tarayıcısını kodla açmak istiyorum, yardımlarınız için şimdiden teşekkür ediyorum, herkese kolay gelsin.

 

[serqet]

Sub n()

Dim internet As Object
Dim adres As String
adres = "http://www.google.com.tr"
Set internet = CreateObject("WScript.Shell")
internet.Run "IExplore.exe " & adres
End Sub

Denermisiniz.

 

[Merhum İdris SERDAR]

.

Buradaki örnekleri inceleyin.

http://www.excel.web.tr/f125/excelde-onemli-web-sitelerim-t82888.html


.

 

[Seyit Tiken]

Arkadaşlar çook teşekkür ediyorum, işlem tamam.