Sekiranya anda ingin membuka banyak pautan hiper dalam Excel, anda boleh merujuk artikel ini. Di sini kami akan memperkenalkan anda 3 kaedah berguna. Setiap daripada mereka mempunyai kebaikan dan keburukan. Anda boleh memilih mana-mana mengikut keperluan anda.
Dalam beberapa kes, ketika melihat fail Excel yang terdiri daripada banyak pautan, anda mungkin ingin membuka banyak pautan. Sekiranya hanya ada tiga atau lebih pautan yang akan dibuka, anda boleh menggunakan Kaedah 1 di bawah. Namun, jika anda ingin membuka semua pautan dalam julat yang anda inginkan, anda boleh menggunakan Kaedah 2 sebagai gantinya. Sudah tentu, kadang-kadang, anda mungkin ingin membuka semua pautan yang tersebar di seluruh buku kerja. Kemudian, anda boleh menggunakan cara terakhir.
Kaedah 1: Buka Hyperlink secara manual satu persatu
Untuk membuka hyperlink dalam sel secara manual, anda boleh terus mengklik sel tersebut. Oleh itu, jika tidak ada terlalu banyak pautan yang dapat dibuka, anda boleh mengklik sel untuk membuka pautan tersebut satu persatu.
Kaedah 2: Hiperpautan Terbuka Kumpulan dalam Julat Terpilih
Namun, kadang-kadang, anda ingin membuka semua pautan hiper dalam julat yang dipilih. Dalam kes ini, anda sebenarnya boleh menggunakan kod VBA berikut.
- Mula-mula, cetuskan editor VBA dalam fail Excel semasa mengikut "Cara Menjalankan Kod VBA di Excel Anda".
- Kemudian, masukkan kod berikut ke dalam modul atau projek.
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
- Selepas itu, tambahkan makro ini ke Bar Alat Akses Pantas atau pita.
- Akhirnya, anda boleh memilih julat yang dikehendaki dan klik butang makro.
- Sekali gus, semua pautan dalam julat yang dipilih akan dibuka di penyemak imbas internet lalai.
Kaedah 3: Batch Open All Hyperlink dalam Buku Kerja
Kadang kala, anda mungkin mahu membuka semua pautan dalam buku kerja, tidak kira di mana lembaran kerja. Dalam keadaan ini, anda boleh menggunakan kod VBA sebagai gantinya.
- Pada mulanya, masukkan kod berikut ke dalam modul atau projek dalam penyunting 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
- Kemudian, tekan "F5" untuk menjalankan makro ini sekarang.
- Segera, semua hyperlink di setiap lembaran kerja akan dibuka.
Membaiki Masalah Excel
Seperti dokumen Word, buku kerja Excel sangat terdedah. Maksudnya, fail Excel boleh rosak kerana pelbagai faktor, termasuk jangkitan virus, kesalahan manusia dan kerosakan Excel dan sebagainya. Oleh itu, anda harus menyediakan alat pembaikan Excel yang hebat, seperti DataNumen Excel Repair, yang boleh pulihkan Excel data tanpa berpeluh.
Pengenalan Pengarang:
Shirley Zhang adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk pemulihan mdf dan produk perisian pembaikan prospek. Untuk maklumat lebih lanjut, lawati www.datanumen.com




