Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako hiperpovezavo ukaznega gumba na naslov URL v Excelu?

V Excelu je lahko preprosto ustvariti hiperpovezavo za gumb za obliko, ali ste kdaj poskusili ustvariti hiperpovezavo na ukazni gumb? Ko kliknete ukazni gumb, se bo obrnil na določeno spletno mesto URL, kot ga potrebujete. V tem članku bom predstavil nekaj hitrih in preprostih trikov za reševanje te naloge v Excelu.

Hiperpovezava ukazni gumb na naslov URL s kodo VBA


puščica modra desno mehurček Hiperpovezava ukazni gumb na naslov URL s kodo VBA

Če hiperpovezavaš ukazni gumb, storite naslednje:

1. Kliknite Razvojni > Vstavi > Gumb za urejanje (nadzor ActiveX)in nato povlecite gumb, kot je prikazan naslednji prikaz slike:

gumb za hiperpovezavo doc 1

2. Ko vstavite ukazni gumb, ga kliknite z desnim gumbom in izberite Nepremičnine iz kontekstnega menija, v Nepremičnine pogovorno okno, kliknite Kategorizirani kartico in vnesite celoten spletni naslov, ki ga želite povezati napis polje z besedilom, si oglejte sliko zaslona:

gumb za hiperpovezavo doc 2

3. Nato zaprite pogovorno okno in desno kliknite zavihek stanja, ki vsebuje ukazni gumb, in izberite Ogled kode iz kontekstnega menija in v odprtem Microsoft Visual Basic za aplikacije okno, kopirajte in prilepite naslednjo kodo v prazno Modul:

VBA koda: hiperpovezava na ukazni gumb:

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

gumb za hiperpovezavo doc 3

Opombe: V zgornji kodi, CommandButton1 je ime ustvarjenega ukaznega gumba, ga spremenite v svojo potrebo.

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

nasveti: Če podnaslov v ukaznem gumbu ni naslov URL, je le besedilni niz, kot je prikazan naslednji prikaz zaslona:

gumb za hiperpovezavo doc 4

Za dosego tega lahko uporabite spodnjo kodo VBA:

VBA koda: hiperpovezava na ukazni gumb:

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

gumb za hiperpovezavo doc 5

Opombe: V zgornji kodi, CommandButton1 je ime ustvarjenega ukaznega gumba, zato ga morate zamenjati https://www.extendoffice.com na svoj URL naslov.


Priporočena orodja za produktivnost za Excel

zavihek kte 201905

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.