Če želite v Excelu paketno odpreti več hiperpovezav, si oglejte ta članek. Tu vam bomo predstavili 3 priročne metode. Vsak od njih ima svoje prednosti in slabosti. Izberete lahko katero koli glede na vaše potrebe.
V nekaterih primerih boste med ogledom datoteke Excel, ki je sestavljena iz številnih hiperpovezav, morda želeli paketno odpreti več hiperpovezav. Če je treba odpreti le tri ali več povezav, lahko preprosto uporabite spodnjo metodo 1. Če pa želite paketno odpreti vse povezave v želenih obsegih, lahko namesto tega uporabite 2. način. Seveda boste včasih morda želeli paketno odpreti vse povezave, razpršene po celotnem delovnem zvezku. Nato lahko uporabite zadnji način.
1. način: Ročno odprite hiperpovezave eno za drugo
Če želite hiperpovezavo v celici odpreti ročno, jo lahko neposredno kliknete. Če torej ni preveč hiperpovezav, ki jih je treba odpreti, lahko kliknete celice, da hiperpovezave odprete eno za drugo.
2. način: paketno odprte hiperpovezave v izbranih obsegih
Vendar včasih želite paketno odpreti vse hiperpovezave v izbranih obsegih. V tem primeru lahko dejansko uporabite naslednjo kodo VBA.
- Najprej sproži urejevalnik VBA v trenutni Excelovi datoteki v skladu z “Kako zagnati kodo VBA v Excelu".
- Nato v modul ali projekt vstavite naslednjo kodo.
Sub BatchOpenHyperLinks_SelectedRanges()
Dim objSelectedRange As Excel.Range
Dim objHyperlink As Excel.Hyperlink
'Get selected ranges
Set objSelectedRange = Excel.Application.Selection
For Each objHyperlink In objSelectedRange.Hyperlinks
objHyperlink.Follow
Next
End Sub
- Po tem dodajte ta makro v orodno vrstico ali trak za hitri dostop.
- Na koncu lahko izberete želene obsege in kliknete gumb makra.
- Naenkrat se bodo v privzetem internetnem brskalniku odprle vse hiperpovezave v izbranih obsegih.
3. način: paketno odprite vse hiperpovezave v delovnem zvezku
Včasih boste morda želeli odpreti vse hiperpovezave v delovnem zvezku, ne glede na to, na katerem delovnem listu. V tem primeru lahko namesto tega uporabite kodo VBA.
- Sprva vstavite naslednjo kodo v modul ali projekt v urejevalniku VBA.
Sub BatchOpenHyperLinks_Workbook()
Dim objWorksheet As Excel.Worksheet
Dim objSelectedRange As Excel.Range
Dim objHyperlink As Excel.Hyperlink
'Process each worksheet
For Each objWorksheet In ThisWorkbook.Sheets
For Each objHyperlink In objWorksheet.Hyperlinks
objHyperlink.Follow
Next
Next
End Sub
- Nato pritisnite "F5", da zaženete ta makro zdaj.
- Takoj se odprejo vse hiperpovezave na vsakem delovnem listu.
Popravite težave z Excelom
Tako kot Wordovi dokumenti so tudi Excelovi delovni zvezki zelo ranljivi. To pomeni, da so datoteke Excel lahko poškodovane zaradi več dejavnikov, vključno z okužbo z virusi, človeškimi napakami in zrušitvami v Excelu itd. Zato bi morali pripraviti zmogljivo orodje za popravljanje v Excelu, kot je DataNumen Excel Repair, ki lahko obnoviti Excel podatkov, ne da bi se znojil.
Uvod avtorja:
Shirley Zhang je strokovnjakinja za obnovitev podatkov v DataNumen, Inc., ki je vodilna na svetu na področju tehnologij za obnovitev podatkov, vključno z izterjava mdf in obeti za popravilo programskih izdelkov. Za več informacij obiščite www.datanumen.com




