Come verificare se esiste un collegamento ipertestuale in un foglio di lavoro in Excel?
Per verificare se esiste un collegamento ipertestuale in una selezione, puoi provare il seguente codice VBA.
Controlla se esiste un collegamento ipertestuale in una selezione con codice VBA
Controlla se esiste un collegamento ipertestuale in una selezione con codice VBA
È possibile verificare se esiste un collegamento ipertestuale in una selezione o in un foglio di lavoro con il seguente codice VBA.
1. Stampa altro + F11 tasti contemporaneamente per aprire il file Microsoft Visual Basic, Applications Edition finestra.
2. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Moduli. Quindi copia e incolla il seguente codice VBA nella finestra del codice.
VBA: controlla se esiste un collegamento ipertestuale in una selezione
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. Stampa F5 chiave per eseguire il codice. Quindi otterrai un file Kutools for Excel finestra di dialogo, selezionare un intervallo che si desidera sapere se esiste un collegamento ipertestuale e fare clic su OK pulsante.
Quindi viene visualizzata una finestra di dialogo per mostrare le celle che contengono collegamenti ipertestuali nell'intervallo selezionato.
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!