Opredelitev hiperpovezave VBA

Hiperpovezava se običajno uporablja s spletnimi mesti za krmarjenje z ene strani na drugo ali od enega do drugega spletnega mesta. Na podoben način lahko nadzorujemo premike tudi v Excelovem delovnem listu. Različne operacije, ki jih lahko izvajamo v Excelu, so:

  • Premik na določeno mesto v trenutnem delovnem zvezku.
  • Odpiranje različnih dokumentov in v dokumentu izberite omenjeno območje.
  • Navigacija do spletnih strani z delovnega lista.
  • Pošiljanje e-pošte na določen naslov.

Hiperpovezavo je enostavno prepoznati zaradi spremembe barve, večinoma modre. Obstajajo različne metode za ustvarjanje hiperpovezave v excelu in dovolite uporabo VBA.

Kako ustvariti hiperpovezavo v Excelu z uporabo kode VBA?

Lahko dodate hiperpovezavo besedilu ali en list na drug delovni list v Excelu z uporabo lastnosti hiperpovezave dodajanje. Oblika mora slediti določitvi, kje naj se ustvari hiperpovezava in navigacijski URL itd.

Oblika za hiperpovezavo VBA Dodaj

Oblika prikazuje parametre, ki jih je treba navesti, da dodate hiperpovezavo na delovni list.

  • Sidro: Določi celico, za katero želite ustvariti hiperpovezavo.
  • Naslov: URL, na katerega se mora premikati navigacija
  • (Podnaslov): Podnaslov URL-ja.
  • (ScreenTip): vrednost kazalca miške, ki se prikaže med postavljanjem kazalca miške.
  • (Besedilo za prikaz): besedilo mora biti prikazano v celici.

Za dodajanje hiperpovezave uporabite lastnost Aktivne celice.

Na seznamu izberite način dodajanja

Primeri za ustvarjanje hiperpovezav v Excelu VBA

Spodaj so različni primeri ustvarjanja hiperpovezav v excelu z uporabo kode VBA.

Predlogo za VBA Hyperlink Excel lahko prenesete tukaj - VBA predlogo Hyperlink Excel

Primer # 1 - Ustvarjanje hiperpovezave med delovnim listom in spletnim mestom

Želimo ustvariti hiperpovezavo z delovnega lista z imenom sub na spletnem mestu z uporabo kode VBA v excelu.

Spodaj so koraki za ustvarjanje hiperpovezave v Excelu VBA:

1. korak: ustvarite funkcijo z imenom hiper, da dodate hiperpovezavo.

Koda:

 Zasebni Sub hiper () End Sub

2. korak: Uporabite predmet Active Cell, da odprete metodo dodajanja hiperpovezave.

Koda:

 Zasebni sub hiper () ActiveCell.Hyperlinks.Add (konec sub

3. korak: Navedite vrednosti parametrov za metodo dodajanja hiperpovezave.

Koda:

 Zasebni sub hiper () ActiveCell.Hyperlinks.Add Anchor: = Sheets ("sub"). Obseg ("A1"), Address: = "https://www.educba.com/", SubAddress: = "", ScreenTip : = "gre za hiperpovezavo", TextToDisplay: = "Excel Training" End Sub
  • Sidro: ime delovnega lista
  • Naslov: Hiperpovezava do mesta, kjer naj se krmili, glede na naslov spletnega mesta
  • ScreenTip: Besedilo kazalca miške
  • TextToDisplay: Temu besedilu naj bo dodeljena hiperpovezava

4. korak: Pritisnite tipko F5 ali Run pod VBE, da zaženete to kodo in si ogledate izhod.

Izbran je obseg celic A1 in besedilo je dodeljeno s hiperpovezavo, ko kliknete besedilo "Excel Training", se bo preusmerilo na spletno mesto https://www.educba.com/. Ko premaknete kazalec miške poleg besedila, bo prikazal besedilo kazalca miške.

Primer # 2 - Hiperpovezava za povezovanje dveh delovnih listov

Imamo dva delovna lista z imenom Home in sub . Poskusimo ustvariti hiperpovezavo od podstrani do doma z uporabo kode VBA.

Sledite spodnjim korakom za ustvarjanje hiperpovezave z enega delovnega lista na drugega v istem delovnem zvezku z uporabo kode VBA.

1. korak: ustvarite funkcijo, kamor bomo zapisali vse kode za izvedbo dejanja. Napišite kodo, da izberete delovni list 'pod' z uporabo izbirne metode delovnega lista.

Koda:

 Zasebni Sub hiper1 () Delovni listi ("pod") Izberite End Sub

Ker se nadzor premika znotraj lista, je treba izbrati delovni list, v katerem ustvarjate hiperpovezavo.

2. korak: Izberite obseg celic na listu, na katerem želite ustvariti hiperpovezavo.

Koda:

 Zasebni Sub hiper1 () Delovni listi ("pod"). Izberite Obseg ("A1"). Izberite End Sub

Korak 3: Zdaj dodamo hiperpovezavo s pomočjo lastnosti aktivne celice.

Koda:

 Zasebni Sub hiper1 () Delovni listi ("pod"). Izberite območje ("A1"). Izberite ActiveCell.Hyperlinks.Add Anchor: = Izbira, naslov: = "", podnaslov: = "'Domov'! A1", TextToDisplay: = "Kliknite za premik domačega lista" End Sub

Ker je delovni list že izbran, je sidro podano kot »Izbor«. Hiperpovezava je določena kot lista »Domov« in obseg A1.

4. korak: Zaženite kodo in podmeni lista bo prikazana hiperpovezava spodaj.

Korak 5: Ko kliknete besedilo, se kontrola premakne na list » Domov «. In izbrana bo celica A1.

Primer # 3 - Hiperpovezava z več delovnimi listi

Če želite ustvariti hiperpovezavo na več delovnih listih, je možno tudi. V tem primeru imamo v istem delovnem zvezku več listov. Različne vrste funkcij excel obstajajo tako v glavnem delovnem listu "Funkcije". Poskusimo ustvariti hiperpovezavo do različnih delovnih listov, imenovanih z različnimi funkcijami, z uporabo kode VBA:

Več delovnih listov je poimenovano kot spodaj z različnimi imeni excel funkcije

Ker želimo ustvariti hiperpovezavo do vsakega delovnega lista, je težko ponoviti kodo. Za ustvarjanje hiperpovezave s kodo VBA v Excelu sledite spodnjim korakom:

1. korak: ustvarite spremenljivko za enostavno obravnavo delovnega lista.

Koda:

 Zasebni Sub hiper2 () Dim ws kot delovni konec End Sub

2. korak: Zdaj želimo izbrati glavno stran, ki deluje kot indeksna stran, in izbrati obseg celic A1.

Koda:

 Zasebni Sub hiper2 () Dim ws kot delovni listi ("Functions"). Izberite Obseg ("A1"). Izberite End Sub

3. korak: Če se želite premikati po več delovnih listih in hiperpovezavah, ustvarjamo za vsako zanko. A1 je že izbran kot aktivna celica, tako da iz tega ustvari hiperpovezavo.

Koda:

 Zasebni sub hiper2 () Dim ws kot delovni delovni listi ("funkcije"). Izberite obseg ("A1"). Izberite za vsako ws v ActiveWorkbook.Worksheets ActiveCell.Hyperlinks.Add Anchor: = ActiveCell Naprej ws End Sub

4. korak: Navedite vrednosti parametrov, da ustvarite hiperpovezavo za vsak delovni list. Ker se hiperpovezava začne s sidra aktivne celice = Aktivna celica, je naslov dan kot "" .

Koda:

 Zasebni Sub hiper2 () Dim ws kot delovni delovni listi ("Funkcije"). Izberite obseg ("A1"). Izberite za vsako ws v ActiveWorkbook.Worksheets ActiveCell.Hyperlinks.Add Anchor: = ActiveCell, Address: = "" Naslednji konec konca Pod

5. korak: Hiperpovezava je prekinjena s pomočjo delovnega lista, zato bi morali podnapisati kot imena lista. Za pridobitev imen listov lahko uporabimo spremenljivko ws in obseg celic kot A1. Ime lista se bo nanašalo na en sam citat. Ime in obseg lista bosta določena in tudi zaprta z enim citatom.

Koda:

 Zasebni pod hiper2 () Dim ws kot delovni listi za delovne liste ("funkcije"). Izberite obseg ("A1"). Izberite za vsako ws v ActiveWorkbook.Worksheets ActiveCell.Hyperlinks.Add Anchor: = ActiveCell, naslov: = "", podnaslov: = "" & ws.Name & "! A1" & "" Naprej ws End Sub

6. korak: Če dobite hiperpovezavo z imenom lista, TextToDisplay kot ws.Name

Koda:

 Zasebni pod hiper2 () Dim ws kot delovni listi za delovne liste ("funkcije"). Izberite obseg ("A1"). Izberite za vsako ws v ActiveWorkbook.Worksheets ActiveCell.Hyperlinks.Add Anchor: = ActiveCell, naslov: = "", podnaslov: = "" & ws.Name & "! A1" & "", TextToDisplay: = ws.Name Naprej ws End Sub

Ta koda bo shranila hiperpovezavo za vsak delovni list v isto celico A1.

7. korak: Če želite spremeniti ta list v drugo celico navzdol po eno celico iz aktivne celice.

Koda:

 Zasebni pod hiper2 () Dim ws kot delovni listi za delovne liste ("funkcije"). Izberite obseg ("A1"). Izberite za vsako ws v ActiveWorkbook.Worksheets ActiveCell.Hyperlinks.Add Anchor: = ActiveCell, naslov: = "", podnaslov: = "" & ws.Name & "! A1" & "", TextToDisplay: = ws.Name ActiveCell.Offset (1, 0). Izberite Next ws End Sub

Korak 8: Zaženite program in ime vsakega lista bo prikazano na listu „Functions“ in s klikom nanj se bo kontrola premaknila na ustrezen list.

Stvari, ki jih je treba zapomniti

  • Lastnost hiperpovezave aktivne celice, ki se uporablja za ustvarjanje hiperpovezav v VBA.
  • Hiperpovezava pomaga enostavno premikanje znotraj delovnega zvezka.

Priporočeni članki

To je vodnik za hiperpovezave VBA. Tukaj smo izvedeli, kako ustvariti hiperpovezave na delovnem listu z uporabo kode VBA za hitro premikanje z enega lista na drugega, skupaj z nekaj praktičnimi primeri in naložljivo predlogo Excela. Ogledate si lahko tudi druge naše predlagane članke -

  1. Uvod v VBA zanke
  2. Odstranite hiperpovezave v Excelu
  3. VBA odmor za zanko
  4. Poiščite zunanje povezave v Excelu

Kategorija:

VBA