..|| Blog || Produkti/Storitve || MExcel || MDodatki || 300 nasvetov ||..

Odpiranje določene spletne strani

Pomoč pri izdelavi makrov

Odpiranje določene spletne strani

OdgovorNapisal/-a BJ » Pe dec 20, 2019 3:01 pm

Pozdravljeni!
Prosim za pomoč.
Na listu imam ukazni gumb, s katerim bi rad odprl določeno spletno stran.
(brskalnik: IE ali Google Chrome)
Zadeva je verjetno čisto preprosta, vendar jaz nimam ideje.
Hvala!
BJ
 
Prispevkov: 160
Pridružen: Sr okt 26, 2005 5:46 pm



Matjazev.NET
 

Re: Odpiranje določene spletne strani

OdgovorNapisal/-a admin » Pe dec 20, 2019 4:12 pm

Pozdravljeni,

Res je dokaj enostavno:
Koda: Izberi vse
Sub skociNaSplet(kam As String)
On Error GoTo napaka
  ThisDocument.FollowHyperlink Address:=kam, NewWindow:=True
  Exit Sub
 
napaka:
  MsgBox "Trenutno ne morem prikazati strani " & kam
End Sub

Sub test()
    skociNaSplet "https://mnet.si"
End Sub
lp,
Matjaž Prtenjak
Administrator
admin
Site Admin
 
Prispevkov: 3564
Pridružen: Sr jul 20, 2005 10:06 pm

Re: Odpiranje določene spletne strani

OdgovorNapisal/-a BJ » Po dec 23, 2019 2:15 pm

Najlepša hvala za pomoč.
Ste mi dal idejo.
Vse skupaj sem še bolj poenostavil.
Vesele prihajajoče praznike vam želim!
Koda: Izberi vse
Private Sub cb3_Click()
 List3.Range("A2").Hyperlinks.Item(1).Follow NewWindow:=True
End Sub
BJ
 
Prispevkov: 160
Pridružen: Sr okt 26, 2005 5:46 pm


Vrni se na VBA

Kdo je prisoten

Po forumu brska: 0 registriranih uporabnikov in 2 gostov

cron