Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
456to460
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
456to460
456to460
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

mehrere hyperlinks auf einmal aendern

mehrere hyperlinks auf einmal aendern
20.07.2004 12:34:28
sam
hi,
habe eine excel tabelle,
in der ich mehrere hyperlinks auf andere files habe.
nun hat sich bei uns im netz
das laufwerk geaendert.
nun muss die exceltabelle angepasst werden,
wie kann ich alle hyperlinks auf einmal aendern
gibt es da eine funktion
****************
Gruesse SAM

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: mehrere hyperlinks auf einmal aendern
20.07.2004 12:46:03
Nico
hi
vielleicht kannste mit suchen und ersetzen (strg+h) arbeiten.
suchen C:
ersetzen durch d:
z.b.
Gruß
Nico
AW: mehrere hyperlinks auf einmal aendern
andreas
hallo sam ,
aus der recherche :

Sub test()
Dim oldtext As String
Dim newtext As String
Dim h As Hyperlink
' Beliebiger Textbestandteil eines Hyperlink, z.B. ".com" oder ".org".
oldtext = "aa"
newtext = "qqqqqqqqqqq"
' Alle Hyperlinks im aktiven Arbeitsblatt prüfen.
For Each h In ActiveSheet.Hyperlinks
x = InStr(1, h.Address, oldtext)
If x > 0 Then
'h.TextToDisplay = newtext
h.Address = newtext
End If
Next
End Sub

gruß
andreas e


http://www.fachforen.de
eine Linksammlung zu diversen fachforen
Anzeige

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige