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

Ako želite grupno otvoriti više hiperveza u Excelu, možete pogledati ovaj članak. Ovdje ćemo vam predstaviti 3 zgodne metode. Svaki od njih ima svoje prednosti i nedostatke. Možete odabrati bilo koji prema vašim potrebama.

U nekim slučajevima, kada gledate Excel datoteku koja se sastoji od puno hiperveza, možda ćete poželjeti grupno otvoriti više hiperveza. Ako postoje samo tri ili više veza koje treba otvoriti, možete koristiti metodu 1 ispod. Ipak, ako želite grupno otvoriti sve veze u željenim rasponima, umjesto toga možete koristiti metod 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 otvarajte hiperveze jednu po jednu

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

Metoda 2: Grupno otvorene hiperveze u odabranim opsezima

Ipak, s vremena na vrijeme poželite grupno otvoriti sve hiperveze u odabranim rasponima. U ovom slučaju, zapravo možete koristiti 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 projekat.

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 ovaj makro na alatnu traku ili traku za brzi pristup.
4. Konačno, možete odabrati željene opsege i kliknuti na dugme makro.
5. Odjednom će se sve hiperveze u odabranim rasponima otvoriti u zadanom internet pretraživaču.

Metod 3: Grupno otvaranje svih hiperveza u radnoj svesci

Ponekad ćete možda poželeti da otvorite sve hiperveze u radnoj svesci, bez obzira u kom radnom listu. U ovoj situaciji, umjesto toga možete koristiti VBA kod.

1. Prvo stavite sljedeći kod u modul ili projekat u VBA editoru.

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 pokrenete ovaj makro upravo sada.
3. Odmah će se otvoriti sve hiperveze na svakom radnom listu.

Popravite probleme sa Excelom

Kao i Word dokumenti, Excel radne sveske su veoma ranjive. To znači da Excel datoteke mogu biti oštećene zbog više faktora, uključujući infekciju virusom, ljudske greške i rušenja Excela i tako dalje. Stoga biste trebali pripremiti moćan Excel alat za popravke, kao što je DataNumen Excel Repair, što može oporaviti Excel podataka bez znojenja.

Uvod za autora:

Shirley Zhang je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući mdf recovery i Outlook softverski proizvodi za popravku. Za više informacija posjetite www.datanumen.com