Thema Datum  Von Nutzer Rating
Antwort
26.09.2024 15:05:25 Johannes
NotSolved
Blau Excel mehrere Hyperlink teilweise ändern
 26.09.2024 16:04:17 Gast20564
*****
Solved

Ansicht des Beitrags:
Von:
Gast20564		 Datum:
26.09.2024 16:04:17		 Views:
43		 Rating:
     
Antwort:
 Nein
Thema:
Excel mehrere Hyperlink teilweise ändern

Hallo,

eher vielleicht so:

1
2
3
4
5
6
7
8
Dim hyp As Hyperlink
 
For Each hyp In ActiveSheet.Hyperlinks
  If InStr(hyp.Address, "\112.") <> 0 Then
    hyp.Address = Replace(hyp.Address, "\112.", "\113.")
    hyp.TextToDisplay = Replace(hyp.TextToDisplay , "\112.", "\113.")
  End If
Next

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
26.09.2024 15:05:25 Johannes
NotSolved
Blau Excel mehrere Hyperlink teilweise ändern
 26.09.2024 16:04:17 Gast20564
*****
Solved