Questione : Come aggiornare i Hyperlinks in Excel 2003?

Ho un utente che ha una lima di Excel con una colonna per i Hyperlinks. Questi collegamenti indicano una posizione in nostro file server. dovuto consolidamento dell'assistente avevamo spostato i dati verso un altro assistente. Ora i collegamenti nella lima di supremazia deve essere aggiornato. Ci sono intorno 2000 linee di collegamenti interamente che indicano lo stesso assistente ma le posizioni differenti. Per per esempio. Row1 --> \ \ reparto \ prod.pdf,
Row2 beni \ del serverx --> \ \ serverx \ regione isolata \ prod2.pdf.

Is là del senso aggiornare tutti i collegamenti con il nuovo servername?

class= del

Risposta : Come aggiornare i Hyperlinks in Excel 2003?

Non è completamente chiaro come presentato ma provare quanto segue che sostituisce il serverx con il servery per tutti i hyperlinks sul activesheet.

Sostituire ovviamente le stringhe del bothe nel sommergibile per i valori reali richiesti

Chris
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

redirectLink secondario ()
Rng fioco come gamma

    Per ogni rng in ActiveSheet.UsedRange.Cells
        Se rng. Hyperlinks.Count = 1 allora
            Con rng. Hyperlinks (1)
                . L'indirizzo = sostituisce (. Indirizzo, “ServerX„, “ServerY„, 1, vbTextCompare)
                .TextToDisplay = sostituiscono (.TextToDisplay, “ServerX„, “ServerY„, 1, vbTextCompare)
            Estremità con
        Concluder se
    Dopo
Sommergibile dell'estremità
Altre soluzioni  
 
programming4us programming4us