Note: The other languages of the website are Google-translated. Back to English
English English

Bagaimana cara mengubah beberapa jalur hyperlink sekaligus di Excel?

Untuk beberapa tujuan, Anda dapat membuat beberapa hyperlink untuk data Anda di lembar kerja, dan semua hyperlink ditautkan ke jalur file atau alamat yang sama, tetapi sekarang, Anda perlu mengganti jalur hyperlink ini dengan alamat lain pada satu waktu. Untuk mengubah jalur hyperlink secara individual dapat membuang banyak waktu, adakah cara cepat untuk mengatasi masalah ini?

Ubah beberapa jalur hyperlink sekaligus di lembar kerja dengan kode VBA

Ubah beberapa jalur hyperlink sekaligus di lembar kerja / buku kerja / beberapa lembar / pilihan dengan fitur luar biasa


Ubah beberapa jalur hyperlink sekaligus di lembar kerja dengan kode VBA

Misalkan Anda memiliki daftar data dengan hyperlink yang sama seperti tangkapan layar berikut yang ditampilkan, dan dengan kode VBA, Anda dapat dengan cepat mengganti jalur atau alamat file lama di lembar kerja dengan yang baru.

1. Tahan ALT + F11 kunci, dan itu membuka Jendela Microsoft Visual Basic untuk Aplikasi.

2. Klik Menyisipkan > Modul, dan tempelkan makro berikut di file Jendela modul.

Kode VBA: ubah beberapa jalur hyperlink sekaligus

Sub ReplaceHyperlinks()
'Updateby Extendoffice
Dim Ws As Worksheet
Dim xHyperlink As Hyperlink
Dim xOld As String, xNew As String
xTitleId = "KutoolsforExcel"
Set Ws = Application.ActiveSheet
xOld = Application.InputBox("Old text:", xTitleId, "", Type:=2)
xNew = Application.InputBox("New text:", xTitleId, "", Type:=2)
Application.ScreenUpdating = False
For Each xHyperlink In Ws.Hyperlinks
    xHyperlink.Address = Replace(xHyperlink.Address, xOld, xNew)
Next
Application.ScreenUpdating = True
End Sub

3. Lalu tekan F5 kunci untuk menjalankan kode ini, dan kotak prompt untuk membiarkan Anda memasukkan alamat hyperlink lama Anda ke Teks lama kotak. Lihat tangkapan layar:

4. Klik OK, dan kotak prompt lain muncul untuk mengingatkan Anda memasukkan alamat hyperlink baru yang ingin Anda gunakan.

5. Dan kemudian klik OK, semua alamat hyperlink lama yang sama telah diganti dengan yang baru sekaligus. Lihat tangkapan layar:


Ubah beberapa jalur hyperlink sekaligus di lembar kerja / buku kerja / beberapa lembar / pilihan dengan fitur luar biasa

Jika Anda ingin mengganti jalur hyperlink dari pilihan, beberapa lembar, buku kerja saat ini, atau beberapa buku kerja, bagaimana Anda bisa melakukannya? Dengan Cari dan Ganti fitur dari Kutools untuk Excel, Anda dapat dengan cepat menangani tugas ini.

Catatan:Untuk menerapkan ini Cari dan Ganti utilitas, pertama, Anda harus mengunduh file Kutools untuk Excel, lalu terapkan fitur dengan cepat dan mudah.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Klik Kutools > Navigasi, lihat tangkapan layar:

2. Di tempat terbuka Navigasi pane, klik Temukan dan ganti tab, di Cari dan Ganti pane, klik menggantikan tab, lalu lakukan operasi berikut:

  • Masukkan teks hyperlink lama yang ingin Anda temukan ke dalam file Temukan apa kotak teks, lalu ketikkan teks hyperlink baru yang ingin Anda ganti ke dalam Ganti dengan kolom tulisan;
  • Tentukan cakupan tempat Anda ingin mencari dan mengganti jalur hyperlink dari Dalam daftar drop-down;
  • Kemudian, pilih Hyperlinks dari Lihat di drop down;
  • Terakhir, klik Temukan semua tombol, semua sel terkait yang berisi teks hyperlink tertentu telah dicantumkan ke dalam kotak daftar bawah.

3. Lalu klik Ganti Semua tombol, jalur hyperlink lama telah diubah ke yang baru sekaligus, lihat tangkapan layar:

Klik untuk Mengunduh Kutools for Excel untuk Uji Coba Gratis!


Artikel yang lebih relatif:

  • Ekstrak Alamat Sebenarnya Dari Hyperlink
  • Misalkan Anda memiliki berbagai sel yang berisi hyperlink, dan sekarang Anda perlu melihat tujuan sebenarnya dari hyperlink dan mengekstraknya dari hyperlink seperti gambar berikut yang ditampilkan. Adakah cara mudah untuk mengatasi masalah ini dengan cepat?
  • Ubah URL Gambar Menjadi Gambar Sebenarnya Di Excel
  • Jika Anda memiliki daftar alamat URL gambar di kolom A, dan sekarang, Anda ingin mendownload gambar yang sesuai dari URL dan menampilkannya ke kolom B yang berdekatan seperti gambar di sebelah kiri yang ditampilkan. Di Excel, bagaimana Anda bisa mengekstrak gambar sebenarnya dari URL gambar dengan cepat dan mudah?
  • Ubah Teks Url Menjadi Hyperlink yang Dapat Diklik Di Excel
  • Misalkan Anda memiliki beberapa url di lembar kerja Anda, tetapi tidak ditautkan, dan sekarang Anda perlu mengonversi semua url yang tidak tertaut menjadi hyperlink yang dapat diklik, seperti yang ditunjukkan tangkapan layar berikut. Tentu saja, Anda dapat mengeklik dua kali satu per satu agar dapat diklik, tetapi ini akan memakan waktu jika ada banyak url. Bagaimana Anda bisa mengonversi beberapa url yang tidak tertaut menjadi hyperlink yang dapat diklik secara otomatis di Excel?
  • Buka Halaman Tertentu Dokumen PDF Dari Hyperlink Excel
  • Saat Anda menautkan sel ke file PDF, biasanya, Anda akan masuk ke halaman pertama file PDF saat Anda mengklik untuk membuka hyperlink. Jika Anda perlu langsung melompat ke halaman tertentu dari file PDF dengan mengklik hyperlink, artikel ini mungkin bisa membantu Anda.

Alat Produktivitas Kantor Terbaik

Kutools for Excel Memecahkan Sebagian Besar Masalah Anda, dan Meningkatkan Produktivitas Anda hingga 80%

  • Reuse: Masukkan dengan cepat rumus, bagan yang kompleks dan apa pun yang pernah Anda gunakan sebelumnya; Enkripsi Sel dengan kata sandi; Buat Milis dan mengirim email ...
  • Bilah Formula Super (dengan mudah mengedit beberapa baris teks dan rumus); Membaca Tata Letak (membaca dan mengedit sel dalam jumlah besar dengan mudah); Tempel ke Rentang yang Difilter...
  • Gabungkan Sel / Baris / Kolom tanpa kehilangan Data; Pisahkan Konten Sel; Gabungkan Baris / Kolom Duplikat... Mencegah Sel Duplikat; Bandingkan Rentang...
  • Pilih Duplikat atau Unik Baris; Pilih Baris Kosong (semua sel kosong); Temukan Super dan Temukan Fuzzy di Banyak Buku Kerja; Pilih Acak ...
  • Salinan Tepat Beberapa Sel tanpa mengubah referensi rumus; Buat Referensi Otomatis ke Beberapa Lembar; Sisipkan Poin, Kotak Centang, dan lainnya ...
  • Ekstrak Teks, Tambahkan Teks, Hapus berdasarkan Posisi, Hapus Space; Membuat dan Mencetak Subtotal Paging; Konversi Konten Antar Sel dan Komentar...
  • Filter Super (simpan dan terapkan skema filter ke sheet lain); Penyortiran Lanjutan menurut bulan / minggu / hari, frekuensi dan lainnya; Filter Khusus dengan huruf tebal, miring ...
  • Gabungkan Workbooks dan WorkSheets; Gabungkan Tabel berdasarkan kolom kunci; Pisahkan Data menjadi Beberapa Lembar; Konversi Batch xls, xlsx dan PDF...
  • Lebih dari 300 fitur canggih. Mendukung Office / Excel 2007-2019 dan 365. Mendukung semua bahasa. Penerapan yang mudah di perusahaan atau organisasi Anda. Fitur lengkap uji coba gratis 30 hari. Jaminan uang kembali 60 hari.
tab kte 201905

Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Tingkatkan produktivitas Anda hingga 50%, dan kurangi ratusan klik mouse untuk Anda setiap hari!
officetab bawah
Urutkan komentar berdasarkan
komentar (45)
Belum ada peringkat. Jadilah yang pertama memberi peringkat!
Komentar ini diminimalkan oleh moderator di situs
Menakjubkan itu menyelamatkan banyak usaha saya.
Komentar ini diminimalkan oleh moderator di situs
menyukainya, Anda menghemat banyak pekerjaan.
Komentar ini diminimalkan oleh moderator di situs
Hai, bisakah Anda memberi saya kode VB jika saya perlu mengubah tautan di Powerpoint alih-alih excel? terima kasih
Komentar ini diminimalkan oleh moderator di situs
Hai, ini tampaknya berfungsi dengan baik tetapi beberapa karakter (misalnya "\" dan "%"). Dalam kasus saya, saya memiliki alamat hyperlink seperti [../../../../../../Application%20Data/Microsoft/2012/Relacom%20Uki-Kantvik-Tallinna-Pietari-Uki_saate151012.xls] dan Saya perlu memulai [../../../../../../Application%20Data/Microsoft/] dari alamat dari ratusan tautan. Awal tautannya sama, tetapi ujungnya berbeda. Apakah Anda punya saran bagus?
Komentar ini diminimalkan oleh moderator di situs
terima kasih!!!! :lol: itu sangat membantu.
Komentar ini diminimalkan oleh moderator di situs
Bagaimana saya mengubah ini untuk memperbarui hyperlink yang menautkan ke referensi dalam buku kerja daripada alamat web eksternal?
Komentar ini diminimalkan oleh moderator di situs
Hanya perlu sama, coba perubahan ini: Sub ReplaceHyperlinks() 'Updateby20140220 Dim Wb As Workbook Dim Ws As Worksheet Dim xHyperlink As Hyperlink Dim xOld As String, xNew As String xTitleId = "CambiaLink" 'Set Ws = Application.ActiveSheet Set Wb = Application.ActiveWorkbook xOld = Application.InputBox("Teks lama:", xTitleId, "", Jenis:=2) xNew = Application.InputBox("Teks baru:", xTitleId, "", Ketik:=2) Untuk Setiap Ws Di Wb.Worksheets 'Application.ScreenUpdating = False Untuk Setiap xHyperlink Di Ws.Hyperlinks Debug.Print ("voy " & xHyperlink.SubAddress) xHyperlink.SubAddress = Replace(xHyperlink.SubAddress, xOld, xNew) Next Next Next Application.ScreenUpdating = True Akhir Sub
Komentar ini diminimalkan oleh moderator di situs
mauricio- Kamu luar biasa! Terima kasih! Juga, untuk laporan lain, saya memerlukannya untuk memperbarui tautan hanya pada tab tertentu, apakah itu mungkin?
Komentar ini diminimalkan oleh moderator di situs
Terima kasih terima kasih!!!!!!! Anda menyelamatkan saya selama 2 hari kerja di sini
Komentar ini diminimalkan oleh moderator di situs
Apakah ada cara untuk mengubah beberapa hyperlink "teks untuk ditampilkan" secara bersamaan?
Komentar ini diminimalkan oleh moderator di situs
Terima kasih untuk Sepotong Program yang brilian. Bekerja SEPERTI CHARM..."WLC"
Komentar ini diminimalkan oleh moderator di situs
Cemerlang! Terima kasih banyak!!!!
Komentar ini diminimalkan oleh moderator di situs
Hai teman-teman apa yang saya lewatkan, saya mendapatkan 'Kesalahan kompilasi - Variabel tidak ditentukan' untuk XTitleId di Excel 2013 : menangis:
Komentar ini diminimalkan oleh moderator di situs
Jangan khawatir, saya menemukan jawabannya dan menetapkannya sebagai string
Komentar ini diminimalkan oleh moderator di situs
itu sangat membantu terima kasih banyak
Komentar ini diminimalkan oleh moderator di situs
Ini adalah artikel Excel paling membantu yang pernah saya temui. Saya memiliki banyak masalah di mana hyperlink dalam file menjadi rusak, atau saya ingin memindahkan lokasi beberapa file hyperlink, dan memperbarui selalu menjadi masalah besar. Programmer Excel saya tidak memiliki perbaikan sederhana. Ini bekerja tanpa cacat. Saya sangat berterima kasih - terima kasih!
Komentar ini diminimalkan oleh moderator di situs
Wow! Ini menyelamatkan saya SO.MUCH.TIME. Anda luar biasa. Terima kasih telah berbagi!
Komentar ini diminimalkan oleh moderator di situs
Ini brilian. Anda menyelamatkan saya SO.MUCH.TIME. hari ini. Terima kasih telah berbagi!
Komentar ini diminimalkan oleh moderator di situs
Terima kasih banyak telah mengembangkan ini! Saya memiliki pengguna yang membuat banyak hyperlink pada banyak tab (setidaknya beberapa ratus) dan entah bagaimana mereka memiliki jalur file ke folder AppData\Roaming di drive c-nya alih-alih ke folder jaringan. Saya dapat menggunakan skrip VBA Anda untuk menghapus bagian kode tautan itu dan sekarang semuanya berfungsi. Menyelamatkan kami mungkin selama seminggu memperbarui dan saya membutuhkan waktu kurang dari 2 menit untuk mengimplementasikannya!
Komentar ini diminimalkan oleh moderator di situs
Luar biasa. Bekerja seperti pesona di excel 2013, tidak diperlukan penyesuaian, tidak seperti perbaikan serupa yang pernah saya lihat untuk masalah ini. TERIMA KASIH banyak. Menghemat sakit kepala besar dan waktu berjam-jam.
Komentar ini diminimalkan oleh moderator di situs
Saya mencoba menjalankannya di hyperlink yang berisi referensi folder lain tetapi tidak berhasil. Bagaimana saya mengubah ini untuk memperbarui hyperlink yang menautkan ke folder di dalam hard drive daripada alamat web eksternal?
Belum ada komentar yang diposting di sini
Muat Lebih
Tinggalkan komentar anda
Posting sebagai Tamu
×
Beri peringkat pos ini:
0   Karakter
Lokasi yang Disarankan