Kako preveriti, ali hiperpovezava obstaja na delovnem listu v Excelu?
Če želite preveriti, ali v izboru obstaja hiperpovezava, lahko preizkusite naslednjo kodo VBA.
Preverite, ali obstaja hiperpovezava v izboru s kodo VBA
Preverite, ali obstaja hiperpovezava v izboru s kodo VBA
Lahko preverite, ali hiperpovezava obstaja v izboru ali na delovnem listu z naslednjo kodo VBA.
1. Pritisnite druga + F11 tipke hkrati, da odprete Microsoft Visual Basic za aplikacije okno.
2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduli. Nato kopirajte in prilepite naslednjo kodo VBA v okno Code.
VBA: Preverite, ali v izboru obstaja hiperpovezava
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 Sub3. Pritisnite F5 tipko za zagon kode. Potem boste dobili a Kutools za Excel v pogovornem oknu izberite obseg, ki ga želite vedeti, če obstaja hiperpovezava, in kliknite na OK gumb.
Nato se prikaže pogovorno okno, ki vam prikaže celice, ki vsebujejo hiperpovezave v izbranem obsegu.
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
