Conas a sheiceáil an bhfuil hipearnasc ann i mbileog oibre in Excel?

Chun a sheiceáil an bhfuil hipearnasc ann i rogha, is féidir leat an cód VBA seo a leanas a thriail.

Seiceáil an bhfuil hipearnasc ann i rogha le cód VBA

---

Seiceáil an bhfuil hipearnasc ann i rogha le cód VBA

Is féidir leat a sheiceáil an bhfuil hipearnasc ann i roghnú nó i mbileog oibre leis an gcód VBA seo a leanas.

1. Brúigh Eile + F11 eochracha ag an am céanna chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil Ionsáigh > Modúil. Agus ansin cóipeáil agus greamaigh an cód VBA seo a leanas i bhfuinneog an Chóid.

VBA: Seiceáil an bhfuil hipearnasc ann i rogha

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. Brúigh F5 eochair chun an cód a rith. Ansin gheobhaidh tú a Kutools le haghaidh Excel bosca dialóige, roghnaigh raon ar mhaith leat a fháil amach an bhfuil hipearnasc ann, agus cliceáil an OK cnaipe.

Ansin tagann bosca dialóige suas chun na cealla ina bhfuil hipearnasc sa raon roghnaithe a thaispeáint duit.