Fråga : Byt ut stränger i Hyperlink tilltalar

Kära experter: AKTIVarbetssedeln för

The innehåller hyperlinks för en radda i som efter stränga. \ My%20Product \… bildar delen av hyperlinken tilltalar. skulle något liknande för
I som byter ut detta, stränger ”My%20Product” med precis ”MyProduct”, wherever det är delen av hyperlinken address.

After som denna funktion har varit färdigt mig skulle något liknande för att utföra det samma tillvägagångssättet med det visade känt av hyperlinken.

Help uppskattas mycket. Tacka dig mycket i förskott.

Regards, Andreas
" klar "

Svar : Byt ut stränger i Hyperlink tilltalar

Kära Andreas,

Behaga försök med fäst kodifierar.

Vad det gör, är att kretsa till och med alla hyperlinks i activesheeten och byter ut stränger dig nämnde i 2 attribut:

1. Tilltala - är ansvariga för anknyta
2. TextToDisplay - är ansvariga för texten som du ser i täcka.

Fungera som gör utbytet är byter ut.

Behaga noterar dig kan ger precis ”%20” som stränger att ändra och” ”(utrymme) som utbytet som får arbete gjort i andra delar av tilltala.

Behaga noterar också för att göra en kopiera av din arbetssedel för spring någon att kodifiera.

Hälsningar
mest fakest
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
Dunkel string_to_change som stränger, string_replacement som stränger

string_to_change = ”\ My%20Products \”,
string_replacement = ”\ min produkter \”,

Dunkla hl som Hyperlink
För varje hl i ActiveSheet.Hyperlinks
  hl. Tilltala = byt ut (hl. Tilltala string_to_change, string_replacement),
  hl.TextToDisplay = byter ut (hl.TextToDisplay, string_to_change, string_replacementen)
Därefter
Andra lösningar  
 
programming4us programming4us