3 jednostavna načina za grupno otvaranje više hiperveza u vašem Excelu

Ako želite skupno otvoriti više hiperveza u Excelu, možete pogledati ovaj članak. Ovdje ćemo vam predstaviti 3 praktične metode. Svaki od njih ima svoje prednosti i nedostatke. Možete odabrati bilo koju prema svojim potrebama.

U nekim slučajevima, kada pregledavate Excel datoteku koja se sastoji od puno hiperveza, možda ćete htjeti grupno otvoriti više hiperveza. Ako postoje samo tri ili više veza koje treba otvoriti, možete jednostavno upotrijebiti metodu 1 u nastavku. Ipak, ako želite grupno otvoriti sve veze u željenim rasponima, umjesto toga možete koristiti metodu 2. Naravno, ponekad ćete možda poželjeti grupno otvoriti sve veze razbacane po cijeloj radnoj knjizi. Zatim, možete koristiti posljednji način.

Metoda 1: Ručno otvaranje hiperveza jednu po jednu

Da biste ručno otvorili hipervezu u ćeliji, možete izravno kliknuti na ćeliju. Dakle, ako nema previše hiperveza za otvaranje, možete kliknuti na ćelije da otvorite hiperveze jednu po jednu.

Metoda 2: Skupno otvaranje hiperveza u odabranim rasponima

Ipak, ponekad želite grupno otvoriti sve hiperveze u odabranim rasponima. U ovom slučaju zapravo možete upotrijebiti sljedeći VBA kod.

1. Prvo, pokrenite VBA editor u trenutnoj Excel datoteci prema "Kako pokrenuti VBA kod u vašem Excelu".
2. Zatim stavite sljedeći kod u modul ili projekt.

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

3. Nakon toga dodajte ovu makronaredbu na alatnu traku za brzi pristup ili vrpcu.
4. Na kraju možete odabrati željene raspone i kliknuti gumb makronaredbe.
5. Odjednom će se sve hiperveze u odabranim rasponima otvoriti u zadanom internet pregledniku.

Metoda 3: Skupno otvaranje svih hiperveza u radnoj knjizi

Ponekad ćete možda htjeti otvoriti sve hiperveze u radnoj knjizi, bez obzira na radnom listu. U ovoj situaciji umjesto toga možete koristiti VBA kod.

1. Najprije stavite sljedeći kod u modul ili projekt u VBA uređivaču.

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

2. Zatim pritisnite “F5” da biste odmah pokrenuli ovu makronaredbu.
3. Odmah će se otvoriti sve hiperveze na svakom radnom listu.

Popravite probleme s Excelom

Poput Wordovih dokumenata, Excelove radne knjige vrlo su ranjive. Drugim riječima, Excel datoteke mogu biti oštećene zbog više čimbenika, uključujući virusnu infekciju, ljudske pogreške i padove programa Excel i tako dalje. Stoga biste trebali pripremiti moćan Excel alat za popravak, kao što je DataNumen Excel Repair, koji može oporaviti Excel podataka bez da se oznojite.

Uvod za autora:

Shirley Zhang stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući mdf oporavak i softverske proizvode za popravak Outlooka. Za više informacija posjetite www.datanumen.com