3 lihtsat viisi mitme hüperlingi avamiseks oma Excelis

Kui soovite Excelis mitu hüperlinki pakkides avada, vaadake seda artiklit. Siin tutvustame teile 3 käepärast meetodit. Igal neist on oma plussid ja miinused. Saate valida mis tahes vastavalt oma vajadustele.

Mõnel juhul võite paljudest hüperlinkidest koosneva Exceli faili vaatamisel soovida mitu hüperlinki pakkides avada. Kui avamiseks on vaja ainult kolm linki, võite kasutada allolevat 1. meetodit. Kui aga soovite kõik soovitud vahemike lingid pakkides avada, võite selle asemel kasutada meetodit 2. Muidugi võite mõnikord soovida avada kõik lingid, mis on hajutatud kogu töövihikus. Seejärel saate kasutada viimast võimalust.

1. meetod: avage hüperlingid käsitsi ükshaaval

Lahtris oleva hüperlingi käsitsi avamiseks võite lahtril otse klõpsata. Seega, kui avatavaid hüperlinke ei ole liiga palju, võite hüperlinkide ükshaaval avamiseks klõpsata lahtritel.Hüperlingi avamiseks klõpsake nuppu Lahter

2. meetod: pakkige avatud hüperlingid valitud vahemikes

Kuid mõnikord soovite kõik valitud vahemike hüperlingid pakkides avada. Sel juhul saate tegelikult kasutada järgmist VBA-koodi.

  1. Kõigepealt käivitage praeguses Exceli failis VBA redaktor vastavalt "Kuidas Excelis VBA koodi käivitada".
  2. Seejärel sisestage järgmine kood moodulisse või projekti.
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

VBA-kood – avatud hüperlingid valitud vahemikes

  1. Pärast seda lisage see makro kiirpääsu tööriistaribale või lindile.
  2. Lõpuks saate valida soovitud vahemikud ja klõpsata makro nuppu.Valige Vahemikud ja Käivita makro
  3. Korraga avatakse kõik valitud vahemike hüperlingid Interneti vaikebrauseris.Avatud valitud hüperlingid

3. meetod: pakkides avage kõik töövihiku hüperlingid

Mõnikord võite soovida avada kõik töövihiku hüperlingid, olenemata sellest, millisel töölehel. Sellises olukorras saate selle asemel kasutada VBA-koodi.

  1. Esmalt sisestage järgmine kood VBA-redaktori moodulisse või projekti.
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

VBA kood – avage kõik töövihiku hüperlingid pakettidena

  1. Seejärel vajutage selle makro käivitamiseks kohe nuppu F5.
  2. Kohe avatakse kõik igal töölehel olevad hüperlingid.Kõik töövihiku hüperlingid on avatud

Parandage Exceli probleemid

Nagu Wordi dokumendid, on ka Exceli töövihikud väga haavatavad. See tähendab, et Exceli failid võivad olla rikutud mitme teguri tõttu, sealhulgas viirusnakkus, inimlikud vead ja Exceli kokkujooksmised ja nii edasi. Seetõttu peaksite ette valmistama võimsa Exceli parandustööriista, näiteks DataNumen Excel Repair, mis võib Exceli taastamine andmeid ilma higistamata.

Autori sissejuhatus:

Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas mdf taastamine ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom

Kommentaarid on suletud.