Pergunta : Substituir a corda no endereço do hipervínculo

Caros peritos: a folha ATIVA do

The contem muitos hipervínculo em que a seguinte corda. \ My%20Product \… faz parte do endereço do hipervínculo. o
I gostaria de substituir esta corda “My%20Product” com apenas o “MyProduct” onde quer que é parte do hipervínculo address.

After que esta operação foi terminado mim gostaria de executar o mesmo procedimento com o nome indicado do hipervínculo. o

Help é apreciado muito. Obrigado muito adiantado.

Regards, Andreas
class= do

Resposta : Substituir a corda no endereço do hipervínculo

Caro Andreas,

Tentar por favor com o código unido.

O que faz são dar laços com todos os hipervínculo no activesheet, e substituem as cordas que você mencionou em 2 atributos:

1. Endereço - é responsável para a ligação
2. TextToDisplay - é responsável para o texto que você vê na folha.

A função que faz a recolocação é substitui.

Anotá-lo por favor pôde apenas dar “%20” enquanto corda para mudar e” “(espaço) como a recolocação para começ o trabalho feito em outras partes do endereço.

Por favor igualmente anotar para fazer uma cópia de sua folha antes de funcionar qualquer código.

Considerações
mais fakest
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
String_to_change não ofuscante como a corda, string_replacement como a corda

string_to_change = “\ My%20Products \”
string_replacement = “\ meus produtos \”

Hl não ofuscantes como o hipervínculo
Para cada hl em ActiveSheet.Hyperlinks
  hl. O endereço = substitui (hl. Endereço, string_to_change, string_replacement)
  hl.TextToDisplay = substituem (hl.TextToDisplay, string_to_change, o string_replacement)
Em seguida
Outras soluções  
 
programming4us programming4us