Petua: Bahasa lain diterjemahkan Google. Anda boleh melawat English versi pautan ini.
Log masuk
x
or
x
x
Daftar Sekarang
x

or

Bagaimana untuk menyemak sama ada hiperpa ada dalam lembaran kerja dalam Excel?

Untuk menyemak sama ada terdapat hiperpautan dalam pilihan, anda boleh mencuba kod VBA berikut.

Semak sama ada hiperpautan dalam pemilihan dengan kod VBA


Cepat memadamkan semua hyperlink dalam julat terpilih, aktif / dipilih / semua helaian dalam Excel:

Kutools untuk Excel's Padamkan Hyperlink utiliti dengan cepat boleh memadamkan semua hyperlink dalam seletced range, lembar aktif, helaian terpilih atau semua helaian dalam buku kerja semasa. Lihat tangkapan skrin di bawah:

Kutools untuk Excel: dengan lebih daripada 200 berguna Excel tambahan, bebas untuk mencuba tanpa had pada hari 60. Muat turun percubaan percuma Sekarang!


anak panah gelembung kanan biru Semak sama ada hiperpautan dalam pemilihan dengan kod VBA


Anda boleh menyemak sama ada terdapat hiperpautan dalam pemilihan atau lembaran kerja dengan kod VBA berikut.

1. Akhbar Alt + F11 kunci pada masa yang sama untuk membuka Microsoft Visual Basic untuk Aplikasi tingkap.

2. Di dalam Microsoft Visual Basic untuk Aplikasi tetingkap, klik Memasukkan > Modul. Dan kemudian salin dan tampal kod VBA berikut ke dalam tetingkap Kod.

VBA: Periksa apakah hiperpa ada dalam pilihan

Sub HyperlinkCells()
    Dim xAdd As String
    Dim xTxt As String
    Dim xCell As Range
    Dim xRg As Range
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.AddressLocal
    Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    For Each xCell In xRg
        If xCell.Hyperlinks.Count > 0 Then xAdd = xAdd & xCell.AddressLocal & ", "
    Next
    If xAdd <> "" Then
        MsgBox "Hyperlink existing in the following cells: " & vbCrLf & vbCrLf & Left(xAdd, Len(xAdd) - 1), vbInformation, "Kutools for Excel"
    End If
End Sub

3. Akhbar F5 kunci untuk menjalankan kod. Kemudian anda akan mendapat Kutools untuk Excel kotak dialog, sila pilih julat yang ingin anda ketahui jika terdapat hiperpautan, dan klik OK butang.

Kemudian kotak dialog muncul untuk menunjukkan kepada anda sel-sel yang mengandungi hyperlink dalam julat yang dipilih.


Cadangan Alat Produktiviti untuk Excel

kte tab 201905

Kutools untuk Excel Membantu Anda Selalu Menyelesaikan Kerja di Hadapan Masa, dan Berdiri Daripada Orang

  • Lebih daripada ciri-ciri canggih 300 yang canggih, yang direka untuk senario kerja 1500, meningkatkan produktiviti oleh 70%, memberi anda lebih banyak masa untuk menjaga keluarga dan menikmati kehidupan.
  • Tidak perlu lagi menghafal formula dan kod VBA, berikan rehat dari otak anda sekarang.
  • Menjadi pakar Excel dalam minit 3, Operasi yang rumit dan berulang boleh dilakukan dalam beberapa saat,
  • Mengurangkan beribu-ribu operasi papan kekunci & tetikus setiap hari, mengucapkan selamat tinggal kepada penyakit pekerjaan sekarang.
  • 110,000 orang yang sangat berkesan dan pilihan syarikat 300 + yang terkenal di dunia.
  • Ciri-ciri penuh 60-hari adalah percubaan percuma. Jaminan wang balik 60 hari. Tahun 2 peningkatan dan sokongan percuma.

Membawa Browsing Tab dan Editing ke Microsoft Office, Jauh Lebih Berkuasa Daripada Tab Penyemak Imbas

  • Tab Pejabat direka untuk Aplikasi Pejabat Word, Excel, PowerPoint dan Lain-lain: Penerbit, Akses, Visio dan Projek.
  • Buka dan buat beberapa dokumen dalam tab baharu pada tetingkap yang sama, dan bukannya dalam tetingkap baru.
  • Meningkatkan produktiviti anda oleh 50%, dan mengurangkan beratus-ratus klik tetikus untuk anda setiap hari!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.