Note: The other languages of the website are Google-translated. Back to English

Kako hiperpovezati ukazni gumb na naslov URL v Excelu?

V Excelu je morda enostavno ustvariti hiperpovezavo za gumb oblike, vendar, ali ste že poskusili ustvariti hiperpovezavo do ukaznega gumba? Ko kliknete ukazni gumb, bo po potrebi preusmerjen na določeno spletno mesto URL. V tem članku bom predstavil nekaj hitrih in enostavnih trikov za reševanje te naloge v Excelu.

Hiperpovežite ukazni gumb na naslov URL s kodo VBA


puščica modri desni mehurček Hiperpovežite ukazni gumb na naslov URL s kodo VBA

Če želite hiperpovezati ukazni gumb, naredite naslednje:

1. Kliknite Razvojni > Vstavi > Ukazni gumb (nadzor ActiveX)in nato narišite gumb, kot je prikazano na sliki:

doc hiperpovezava ukazni gumb 1

2. Ko vstavite ukazni gumb, ga kliknite z desno miškino tipko in izberite Nepremičnine iz kontekstnega menija v Nepremičnine pogovorno okno, kliknite Kategorizirani in vnesite celoten naslov spletnega mesta, na katerega želite povezati napis besedilno polje, glej posnetek zaslona:

doc hiperpovezava ukazni gumb 2

3. Nato zaprite pogovorno okno in z desno miškino tipko kliknite zavihek lista, ki vsebuje ukazni gumb, in izberite Ogled kode v priročnem meniju in v odprtem Microsoft Visual Basic za aplikacije okno, kopirajte in prilepite naslednjo kodo v prazen modul:

Koda VBA: hiperpovezava do ukaznega gumba:

Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:=CommandButton1.Caption
End Sub

doc hiperpovezava ukazni gumb 3

Opombe: V zgornji kodi, Ukazni gumb1 je ime ustvarjenega ukaznega gumba, ga spremenite po svojih željah.

4. Nato shranite kodo in zapustite Način oblikovanja, zdaj, ko kliknete ukazni gumb, bo odprla določeno spletno stran.

nasveti: Če napis v ukaznem gumbu ni naslov URL, je le besedilni niz, kot je prikazano na sliki spodaj:

doc hiperpovezava ukazni gumb 4

Za doseganje lahko uporabite spodnjo kodo VBA:

Koda VBA: hiperpovezava do ukaznega gumba:

Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:="https://www.extendoffice.com"
End Sub

doc hiperpovezava ukazni gumb 5

Opombe: V zgornji kodi, Ukazni gumb1 je ime ustvarjenega ukaznega gumba in zamenjajte naslov spletnega mesta https://www.extendoffice.com na svoj naslov URL.


Najboljša orodja za pisarniško produktivnost

Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%

  • Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
  • Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
  • Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
  • Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
  • Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
  • Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
  • Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
  • Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
  • Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2021 in 365. Podpira vse jezike. Enostavna uvedba v vašem podjetju ali organizaciji. 30-dnevna brezplačna preizkusna različica vseh funkcij. 60-dnevna garancija vračila denarja.
zavihek kte 201905

Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
dno pisarniške mize
Komentarji (6)
Ocene še ni. Bodite prvi in ​​ocenite!
Ta komentar je moderator na spletnem mestu minimiziral
¿Cómo se podría hacer con un cuadro de texo? Es decir, que cualquier dirección web que se ponga en un cuadro de texto se puede abrir con un boton
hvala
Ta komentar je moderator na spletnem mestu minimiziral
Hvala, ali lahko pokažete, kako bi lahko povezali URL iz celice na listu?
Ta komentar je moderator na spletnem mestu minimiziral
Gracias me sirvió full.
Ta komentar je moderator na spletnem mestu minimiziral
Najlepša hvala.
Ta komentar je moderator na spletnem mestu minimiziral
Kan je dit ook gebruiken om met een druk van de knop naar bovenaan een sheet te gaan?
Ta komentar je moderator na spletnem mestu minimiziral
Živjo, Raver,
Če želite klikniti gumb za pomik na vrh delovnega lista, uporabite spodnjo kodo:
Private Sub CommandButton1_Click()
ActiveSheet.Range("A1").Select
End Sub

Prosim poskusite, upam, da vam lahko pomaga!
Tu še ni objavljenih komentarjev
Pustite vaše komentarje
Objava kot gost
×
Ocenite to objavo:
0   Znaki
Predlagane lokacije

Sledi nam

Copyright © 2009 - www.extendoffice.com. | Vse pravice pridržane. Poganja ga ExtendOffice. | Kazalo
Microsoft in logotip Office sta blagovni znamki ali registrirani blagovni znamki družbe Microsoft Corporation v ZDA in / ali drugih državah.
Zaščiteno s Sectigo SSL