Frage : Schnur in der Hyperlink-Adresse ersetzen

Liebe Experten:

The AKTIVES Arbeitsblatt enthält viele Hyperlink, in denen die folgende Schnur. \ Stellt My%20Product \… Teil der Hyperlinkadresse dar.
I möchte diese Schnur „My%20Product“ durch gerade „MyProduct“ ersetzen, wohin es ein Teil des Hyperlink address.

After ist, das dieser Betrieb beendet ich möchte das gleiche Verfahren mit dem angezeigten Namen des Hyperlink durchführen gewesen ist.

Help wird viel geschätzt. Sehr viel im Voraus danke.

Regards, Andreas

Antwort : Schnur in der Hyperlink-Adresse ersetzen

Lieber Andreas,

Mit dem angebrachten Code bitte versuchen.

Was er tut, ist, sich durch alle Hyperlink im activesheet zu schlingen und ersetzt die Schnüre, die Sie in 2 Attributen erwähnten:

1. Adresse - ist für die Verbindung verantwortlich
2. TextToDisplay - ist für den Text verantwortlich, den Sie in das Blatt sehen.

Funktion, die den Wiedereinbau tut, ist ersetzen.

Sie bitte merken konnte „%20“ gerade geben während Schnur, um zu ändern und“ „(Raum) wie der Wiedereinbau, zum der Arbeit zu erhalten erledigt in anderen Teilen der Adresse.

Vor dem Betrieb irgendeines Codes bitte auch merken, um eine Kopie von Ihrem Arbeitsblatt zu erstellen.

Respekt
fakest

1: 2: 3: 4: 5: 6: 7: 8: 9: 10:

Schwaches string_to_change als Schnur, string_replacement als Schnur string_to_change = „\ My%20Products \“ string_replacement = „\ meine Produkte \“ Schwache hl als Hyperlink Für jedes hl in ActiveSheet.Hyperlinks hl. Adresse = ersetzen (hl. Adresse, string_to_change, string_replacement) hl.TextToDisplay = ersetzen (hl.TextToDisplay, string_to_change, string_replacement) Zunächst