Fråga : Hur man uppdaterar Hyperlinks i Excel 2003?

Jag har en användare som har en Excel att spara med en kolonn för Hyperlinks. Dessa anknyter pekar till ett läge i vårt sparar serveren. Tack vare serverbefästning vi hade rört datan till en annan server. Nu anknyter i överträffa sparar behov att uppdateras. Det finns omkring 2000 fodrar av anknyter all att peka till den samma serveren men olika lägen. För eg. Row1 --> \ \ serverx- \ tillgångavdelning \ prod.pdf,
Row2 --> \ \ serverx \ avlägset område \ prod2.pdf.

Is där any långt som uppdaterar alla, anknyter med den nya servernamen?

" klar "

Svar : Hur man uppdaterar Hyperlinks i Excel 2003?

Det är inte fullständigt klart, hur framlagt bara det försök efter som byter ut serverx med serveryen för alla hyperlinks på activesheeten.

Byt ut självfallet bothe stränger i suben för det faktiskt värderar required

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

UnderredirectLink ()
Dunkel rng som spänner

    För varje rng i ActiveSheet.UsedRange.Cells
        Om rng. Hyperlinks.Count = 1 därefter
            Med rng. Hyperlinks (1)
                . Tilltala = byt ut (. Tilltala ”ServerX”, ”ServerY”, 1, vbTextCompare),
                .TextToDisplay = byter ut (.TextToDisplay, ”ServerX”, ”ServerY”, 1, vbTextCompare)
            Avsluta med
        Avsluta om
    Därefter
Avsluta suben
Andra lösningar  
 
programming4us programming4us