Come selezionare e copiare tutti i collegamenti ipertestuali da un documento di Word?
In alcuni casi, hai un documento lungo con più collegamenti ipertestuali esistenti e devi solo copiare tutti i collegamenti ipertestuali contemporaneamente da questo documento e quindi incollarli in un altro. Esiste un modo per copiarli rapidamente tutti in una volta invece di copiarli uno per uno?
Copia tutti i collegamenti ipertestuali con VBA
Estrai tutti gli indirizzi dei collegamenti ipertestuali con VBA
Copia tutti i collegamenti ipertestuali o solo gli indirizzi negli appunti con Kutools per Word
Copia tutti i collegamenti ipertestuali con VBA
1. Aprire il documento di Word di cui si desidera copiare i collegamenti ipertestuali e premere Alt + F11 per aprire il Finestra dell'applicazione Microsoft Visual Based.
2. Clic inserire > Modulie copia il seguente VBA nella finestra.
VBA: copia tutti i collegamenti ipertestuali
Sub HyperlinksExtract()
'Updateby20140214
Dim oLink As Hyperlink
Dim docCurrent As Document 'current document
Dim docNew As Document 'new document
Dim rngStory As StoryRanges
Set docCurrent = ActiveDocument
Set docNew = Documents.Add
For Each oLink In docCurrent.Hyperlinks
oLink.Range.Copy
docNew.Activate
Selection.Paste
Selection.TypeParagraph
Next
Set docNew = Nothing
Set docCurrent = Nothing
End Sub
3. Fare clic sul Correre pulsante per eseguire il codice VBA. Quindi tutti i collegamenti ipertestuali vengono copiati in un nuovo documento. Puoi salvare il nuovo documento in un secondo momento. Puoi vedere il risultato come segue.
Nota: Questo VBA può essere eseguito solo quando tutti i collegamenti ipertestuali sono collegati con la parola, se ci sono immagini con collegamenti ipertestuali, questo codice VBA non può funzionare.
Estrai tutti gli indirizzi di collegamenti ipertestuali con VBA
1. Aprire il documento di Word da cui si desidera estrarre i collegamenti ipertestuali e premere Alt + F11 per aprire il Finestra dell'applicazione Microsoft Visual Based.
2. Clic inserire > Modulie copia il seguente VBA nella finestra.
VBA: estrae tutti gli indirizzi dei collegamenti ipertestuali
Function GetAllHyperlinks()
'Updateby20140214
Dim docCurrent As Document
Dim docNew As Document
Dim oLink As Hyperlink
Dim rng As Range
Application.ScreenUpdating = False
Set docCurrent = ActiveDocument
Set docNew = Documents.Add
For Each oLink In docCurrent.Hyperlinks
Set rng = docNew.Range
rng.Collapse
rng.InsertParagraph
rng.InsertAfter (oLink.Address)
Next
docNew.Activate
Application.ScreenUpdating = True
Application.ScreenRefresh
End Function
3. Fare clic sul Correre pulsante per eseguire il codice VBA. Quindi tutti gli indirizzi dei collegamenti ipertestuali vengono estratti in un nuovo documento, è possibile salvarlo in un secondo momento.
Nota: L'indirizzo dei collegamenti ipertestuali di estrazione non è nell'ordine originale.
Copia tutti i collegamenti ipertestuali o solo gli indirizzi negli appunti con Kutools per Word
Se si desidera copiare tutti i collegamenti ipertestuali o solo gli indirizzi negli appunti dal documento di Word in modo semplice e rapido, il file Copia collegamento ipertestuale utilità di Kutools for Word posso farti questo favore.
Kutools for Word, con oltre funzioni utili, semplifica il tuo lavoro. | ||
Dopo l'installazione Kutools per Word, per favore fai come di seguito:(Scarica gratuitamente Kutools per Word adesso!)
1. Clic Kutools Plus > Copia collegamento ipertestuale.
2. Nella finestra di dialogo popping, scegli un'opzione di cui hai bisogno.
Ora, seleziona una posizione in cui desideri posizionare i collegamenti ipertestuali, premi Ctrl + V incollarli.
Copia e incolla i collegamenti ipertestuali |
Copia e incolla l'indirizzo del collegamento ipertestuale |
Demo: copia collegamento ipertestuale
Navigazione a schede e modifica di più documenti Word / cartelle di lavoro Excel come Firefox, Chrome, Internet Explore 10! |
Potresti avere familiarità con la visualizzazione di più pagine Web in Firefox/Chrome/IE e passare da una all'altra facendo facilmente clic sulle schede corrispondenti. In questo caso, Office Tab supporta un'elaborazione simile, che consente di sfogliare più documenti Word o cartelle di lavoro Excel in una finestra di Word o di Excel e di passare facilmente dall'uno all'altro facendo clic sulle rispettive schede. |
Articoli relativi:
- Inserisci, rimuovi ed elenca tutti i collegamenti ipertestuali del documento corrente in Word
- Inserisci più collegamenti ipertestuali a un documento in Word
- Rimuovi tutti i collegamenti ipertestuali in Word
I migliori strumenti per la produttività in ufficio
Kutools for Word - Migliora la tua esperienza con le parole con Over 100 Caratteristiche notevoli!
🤖 Assistente AI di Kutools: Trasforma la tua scrittura con l'intelligenza artificiale - Genera contenuto / Riscrivere il testo / Riepilogare i documenti / Richiedi informazioni sulla base del documento, tutto all'interno di Word
📘 Padronanza dei documenti: Pagine divise / Unisci documenti / Esporta la selezione in vari formati (PDF/TXT/DOC/HTML...) / Converti in batch in PDF / Esporta pagine come immagini / Stampa più file contemporaneamente...
✏ Modifica dei contenuti: Trova e sostituisci in batch su più file / Ridimensiona tutte le immagini / Trasporre righe e colonne della tabella / Converti tabella in testo...
🧹 Pulito senza sforzo: Spazza via Spazi extra / Interruzioni di sezione / Tutte le intestazioni / Caselle di testo / Collegamenti ipertestuali / Per ulteriori strumenti di rimozione, vai al nostro Rimuovi gruppo...
➕ Inserti creativi: Inserisci Mille separatori / Caselle di controllo / Pulsanti di scelta / QR Code / Codice a barre / Tabella della linea diagonale / Didascalia dell'equazione / Didascalia immagine / Didascalia / Immagini multiple / Scopri di più nella Inserisci gruppo...
???? Selezioni di precisione: Individuare pagine specifiche / con tabelle / forme / paragrafi di intestazione / Migliora la navigazione con Scopri di più Seleziona funzionalità...
⭐ Miglioramenti delle stelle: Naviga rapidamente verso qualsiasi luogo / inserire automaticamente testo ripetitivo / passare senza problemi da una finestra all'altra del documento / 11 strumenti di conversione...