Note: The other languages of the website are Google-translated. Back to English

Come modificare più percorsi di collegamento ipertestuale contemporaneamente in Excel?

Per qualche scopo, è possibile creare più collegamenti ipertestuali per i dati nel foglio di lavoro e tutti i collegamenti ipertestuali sono collegati allo stesso percorso o indirizzo di file, ma ora è necessario sostituire questo percorso del collegamento ipertestuale con un altro indirizzo alla volta. Modificare individualmente il percorso dei collegamenti ipertestuali può far perdere molto tempo, esiste un modo rapido per risolvere questo problema?

Modifica più percorsi di collegamento ipertestuale contemporaneamente in un foglio di lavoro con codice VBA

Cambia più percorsi di collegamento ipertestuale contemporaneamente in un foglio di lavoro / cartella di lavoro / più fogli / selezione con una funzionalità straordinaria


Modifica più percorsi di collegamento ipertestuale contemporaneamente in un foglio di lavoro con codice VBA

Supponendo di avere un elenco di dati con gli stessi collegamenti ipertestuali mostrati nella seguente schermata e con un codice VBA, è possibile sostituire rapidamente il vecchio percorso o indirizzo del file in un foglio di lavoro con uno nuovo.

1. Tenere premuto il tasto ALT + F11 chiavi e apre il file Finestra Microsoft Visual Basic, Applications Edition.

2. Clicchi inserire > Moduloe incolla la seguente macro nel file Finestra del modulo.

Codice VBA: modifica più percorsi di collegamento ipertestuale contemporaneamente

Sub ReplaceHyperlinks()
'Updateby Extendoffice
Dim Ws As Worksheet
Dim xHyperlink As Hyperlink
Dim xOld As String, xNew As String
xTitleId = "KutoolsforExcel"
Set Ws = Application.ActiveSheet
xOld = Application.InputBox("Old text:", xTitleId, "", Type:=2)
xNew = Application.InputBox("New text:", xTitleId, "", Type:=2)
Application.ScreenUpdating = False
For Each xHyperlink In Ws.Hyperlinks
    xHyperlink.Address = Replace(xHyperlink.Address, xOld, xNew)
Next
Application.ScreenUpdating = True
End Sub

3. Quindi premere F5 chiave per eseguire questo codice e una finestra di messaggio per consentire di inserire il vecchio indirizzo del collegamento ipertestuale nel file Vecchio testo scatola. Vedi screenshot:

4. Clic OKe viene visualizzata un'altra finestra di messaggio per ricordarti di inserire il nuovo indirizzo del collegamento ipertestuale che desideri utilizzare.

5. E poi clicca OK, tutti gli stessi vecchi indirizzi di collegamento ipertestuale sono stati sostituiti da quello nuovo contemporaneamente. Vedi screenshot:


Cambia più percorsi di collegamento ipertestuale contemporaneamente in un foglio di lavoro / cartella di lavoro / più fogli / selezione con una funzionalità straordinaria

Se desideri sostituire i percorsi del collegamento ipertestuale da una selezione, più fogli, workkook corrente o più cartelle di lavoro, come potresti fare? Con Trova e sostituisci caratteristica di Kutools for Excel, puoi affrontare rapidamente questa attività.

NOTA:Per applicare questo Trova e sostituisci utility, in primo luogo, dovresti scaricare il file Kutools for Excele quindi applica la funzione in modo rapido e semplice.

Dopo l'installazione Kutools for Excel, per favore fai come questo:

1. Clic Kutools > Navigazione, vedi screenshot:

2. In aperto Navigazione fai clic su Trova e sostituisci scheda, nel Trova e sostituisci fai clic su sostituire scheda, quindi eseguire le operazioni seguenti:

  • Immettere il vecchio testo del collegamento ipertestuale che si desidera trovare nel file Trova quello che casella di testo e quindi digitare il nuovo testo del collegamento ipertestuale che si desidera sostituire con nel file Sostituire con casella di testo;
  • Specificare l'ambito in cui si desidera trovare e sostituire il percorso del collegamento ipertestuale dal file Nel quadro di menu `A tendina;
  • Quindi, seleziona Collegamenti ipertestuali dall'elenco a discesa Cerca in;
  • Finalmente, clicca Trova tutto , tutte le celle corrispondenti che contengono il testo del collegamento ipertestuale specifico sono state elencate nella casella di riepilogo in basso.

3. Quindi, fare clic Sostituisci tutto pulsante, i vecchi percorsi del collegamento ipertestuale sono stati modificati in quelli nuovi contemporaneamente, vedi screenshot:

Fai clic per scaricare Kutools per Excel per la prova gratuita!


Articoli più relativi:

  • Estrai indirizzi effettivi da collegamenti ipertestuali
  • Supponendo di avere un intervallo di celle che contengono collegamenti ipertestuali e ora è necessario vedere la destinazione reale dei collegamenti ipertestuali ed estrarli dai collegamenti ipertestuali come mostrato nella seguente schermata. Esistono modi semplici per risolvere rapidamente questo problema?
  • Converti URL immagine in immagini reali in Excel
  • Se hai un elenco di indirizzi URL di immagini nella colonna A, e ora, vuoi scaricare le immagini corrispondenti dagli URL e visualizzarle nella colonna adiacente B come mostrato nell'immagine a sinistra. In Excel, come potresti estrarre le immagini reali dagli URL delle immagini in modo rapido e semplice?
  • Converti il ​​testo dell'URL in un collegamento ipertestuale cliccabile in Excel
  • Supponendo di avere più URL nel foglio di lavoro, ma non sono collegati, e ora è necessario convertire tutti gli URL non collegati in collegamenti ipertestuali cliccabili, come mostrato nelle schermate seguenti. Ovviamente puoi fare doppio clic su di essi uno per uno per renderli cliccabili, ma questo richiederà tempo se ci sono molti URL. Come è possibile convertire più URL non collegati in collegamenti ipertestuali cliccabili automaticamente in Excel?

I migliori strumenti per la produttività in ufficio

Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%

  • Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
  • Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
  • Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
  • Più di 300 potenti funzionalità. Supporta Office/Excel 2007-2021 e 365. Supporta tutte le lingue. Facile implementazione nella tua azienda o organizzazione. Funzionalità complete Prova gratuita di 30 giorni. Garanzia di rimborso di 60 giorni.
scheda kte 201905

Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il 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!
fondo officetab
Commenti (45)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
Incredibile, mi ha risparmiato un sacco di fatica.
Questo commento è stato fatto dal moderatore sul sito
lo adoro, mi risparmi un sacco di lavoro.
Questo commento è stato fatto dal moderatore sul sito
Ciao, potresti darmi il codice VB se devo cambiare i collegamenti in Powerpoint invece di Excel? Grazie
Questo commento è stato fatto dal moderatore sul sito
Ciao, sembra funzionare alla grande ma alcuni caratteri (ad esempio "\" e "%"). Nel mio caso ho indirizzi di collegamenti ipertestuali come [../../../../../../Application%20Data/Microsoft/2012/Relacom%20Uki-Kantvik-Tallinna-Pietari-Uki_saate151012.xls] e Ho bisogno di ottenere l'inizio [../../../../../../Application%20Data/Microsoft/] lontano dall'indirizzo da centinaia di collegamenti. L'inizio dei collegamenti è lo stesso, ma le estremità sono diverse. Hai qualche buon consiglio?
Questo commento è stato fatto dal moderatore sul sito
Grazie!!!! :lol: mi è stato di grande aiuto.
Questo commento è stato fatto dal moderatore sul sito
Come posso modificarlo per aggiornare i collegamenti ipertestuali che collegano a riferimenti all'interno di una cartella di lavoro anziché a indirizzi Web esterni?
Questo commento è stato fatto dal moderatore sul sito
Avevo solo bisogno dello stesso, prova queste modifiche: Sub ReplaceHyperlinks() 'Updateby20140220 Dim Wb As Workbook Dim Ws As Worksheet Dim xHyperlink As Hyperlink Dim xOld As String, xNew As String xTitleId = "CambiaLink" 'Set Ws = Application.ActiveSheet Set Wb = Application.ActiveWorkbook xOld = Application.InputBox("Old text:", xTitleId, "", Type:=2) xNew = Application.InputBox("New text:", xTitleId, "", Type:=2) Per ogni Ws In Wb.Worksheets 'Application.ScreenUpdating = False per ogni xHyperlink In Ws.Hyperlinks Debug.Print ("voy " & xHyperlink.SubAddress) xHyperlink.SubAddress = Replace(xHyperlink.SubAddress, xOld, xNew) Next Next Application.ScreenUpdating = True Fine Sub
Questo commento è stato fatto dal moderatore sul sito
mauricio- Sei fantastico! Grazie! Inoltre, per un altro rapporto avrò bisogno che aggiorni solo i collegamenti solo su schede specificate, è possibile?
Questo commento è stato fatto dal moderatore sul sito
Grazie grazie grazie !!!!!! mi hai salvato per 2 giorni di lavoro qui
Questo commento è stato fatto dal moderatore sul sito
C'è un modo per modificare più collegamenti ipertestuali "testo da visualizzare" contemporaneamente?
Questo commento è stato fatto dal moderatore sul sito
Grazie per un brillante pezzo di programma. Funziona COME un FASCINO..."WLC"
Questo commento è stato fatto dal moderatore sul sito
Brillante! Molte grazie!!!!
Questo commento è stato fatto dal moderatore sul sito
Ehi ragazzi cosa mi sto perdendo, ottengo "Errore di compilazione - Variabile non definita" per XTitleId in Excel 2013 :cry:
Questo commento è stato fatto dal moderatore sul sito
Nessun problema, l'ho capito e l'ho impostato come una stringa
Questo commento è stato fatto dal moderatore sul sito
è stato di grande aiuto grazie mille
Questo commento è stato fatto dal moderatore sul sito
Questo è l'articolo di Excel più utile che abbia mai trovato. Ho riscontrato molti problemi in cui i collegamenti ipertestuali all'interno di un file vengono danneggiati o voglio spostare la posizione di alcuni file con collegamenti ipertestuali e l'aggiornamento è sempre stato un grosso problema. Il mio programmatore Excel non aveva una soluzione semplice. Questo funziona in modo impeccabile. Sono molto grato - grazie!
Questo commento è stato fatto dal moderatore sul sito
Oh! Questo mi ha salvato TANTO TEMPO. Sei fantastico. Grazie per la condivisione!
Questo commento è stato fatto dal moderatore sul sito
È brillante. Mi hai salvato TANTO TEMPO. oggi. Grazie per la condivisione!
Questo commento è stato fatto dal moderatore sul sito
Grazie mille per aver sviluppato questo! Ho avuto un utente che ha creato un sacco di collegamenti ipertestuali su più schede (almeno diverse centinaia) e in qualche modo avevano un percorso di file nella sua cartella AppData\Roaming sulla sua unità c invece che nella cartella di rete. Sono stato in grado di utilizzare il tuo script VBA per rimuovere quella parte del codice di collegamento e ora funziona tutto. Ci ha risparmiato probabilmente una settimana di aggiornamento e mi ci sono voluti meno di 2 minuti per implementarlo!
Questo commento è stato fatto dal moderatore sul sito
Sorprendente. Ha funzionato come un incantesimo su Excel 2013, nessuna modifica richiesta, a differenza di soluzioni simili che ho visto per questo problema. GRAZIE MOLTO. Ha risparmiato un enorme mal di testa e ore di tempo.
Questo commento è stato fatto dal moderatore sul sito
Ho provato a eseguirlo su collegamenti ipertestuali che contengono riferimenti ad altre cartelle ma non ha funzionato. Come posso modificarlo per aggiornare i collegamenti ipertestuali che collegano a cartelle all'interno di un disco rigido anziché a indirizzi Web esterni?
Non ci sono ancora commenti pubblicati qui
Carica Altre
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite

Seguici

Copyright © 2009 - www.extendoffice.com. | Tutti i diritti riservati. Offerto da ExtendOffice, | Mappa del sito
Microsoft e il logo Office sono marchi o marchi registrati di Microsoft Corporation negli Stati Uniti e / o in altri paesi.
Protetto da Sectigo SSL