Sut i agor hypergysylltiadau lluosog ar unwaith yn Excel?
Gan dybio bod gen i lawer o hyperddolenni mewn taflen waith, fel arfer, gallaf eu hagor trwy eu clicio fesul un, ond bydd clicio sawl gwaith yn annifyr, felly, rydw i eisiau os oes ffordd gyflym o agor yr holl hyperddolenni a ddewiswyd yn yr un amser. O'r erthygl isod, gallaf ddatrys y dasg hon gyda ffordd hawdd.
Agorwch hypergysylltiadau lluosog ar unwaith gyda chod VBA
Agorwch hypergysylltiadau lluosog ar unwaith gyda chod VBA
I agor eich hyperddolenni dethol o ystod ar unwaith, gall y cod VBA canlynol eich helpu chi, gwnewch fel hyn:
1. Daliwch i lawr y ALT + F11 allweddi, ac mae'n agor y Ffenestr Microsoft Visual Basic for Applications.
2. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Ffenestr Modiwl.
Cod VBA: Agorwch hypergysylltiadau lluosog ar unwaith
Sub OpenHyperLinks()
'Update 20141124
Dim xHyperlink As Hyperlink
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each xHyperlink In WorkRng.Hyperlinks
xHyperlink.Follow
Next
End Sub
3. Yna pwyswch F5 allwedd i redeg y cod hwn, a bydd blwch prydlon yn popio allan i'ch atgoffa i ddewis ystod gan gynnwys hypergysylltiadau yr ydych am eu hagor ar unwaith, gweler y screenshot:
4. Ac yna cliciwch OK, mae'r holl hypergysylltiadau yn cael eu hagor ar yr un pryd heb eu clicio.
Erthyglau cysylltiedig:
Sut i gael gwared / dileu pob hypergysylltiad neu fwy yn Excel?
Sut i gael gwared ar hypergysylltiadau heb gael gwared ar fformatio?
Sut i newid sawl llwybr hypergyswllt ar unwaith yn Excel?
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools for Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed o'r blaen. Kutools for Excel Yn cynnig dros 300 o nodweddion uwch i hybu cynhyrchiant ac arbed amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Office Tab Yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer
- Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
- Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
- Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
