Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Hyperlinks automatisch ändern

Forumthread: Hyperlinks automatisch ändern

Hyperlinks automatisch ändern
12.11.2007 20:12:40
Christian
Hallo zusammen,
ich habe eine kleine Herausforderung, die mich "leider" an die Grenzen meinen VBA-Kenntnisse bringt.
Hier also zu meiner Herausforderung.
Ich habe für eine Datei eine Navigation auf Excel-Ziele via Hyperlinks in den Spalten A-F eingebaut.
Nun musste ich erstmal die Navi mit den Links bestücken... soweit ja kein Problem.
Die Datei wird nach Wochentagen aufgesplittet, die vollkommen identisch sind. Wenn ich nun das Blatt kopiere ändern sich die Hyperlinks nicht mit auf das neue Blatt.
Also von file...\...\...\name.xls - Montag!A1:E1 zu file...\...\...\name.xls - Dienstag!A1:E1
Ich weiß das man das via VBA lösen kann, aber ich weiß leider nicht wie.
Für Hilfe bin ich dankbar.
Viele Grüße
Christian

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Hyperlinks automatisch ändern
12.11.2007 22:00:45
Daniel
Hi
wenn du das für eine Navigation innerhalb einer Datei brauchst, würde ich keine Hyperlinks nehmen, sodern einfach ne Zelle nehmen und dort eine Formel reinschreiben, die sich auf den gewünschten bereich bezieht.
(Beipspiel: = Tabelle2!A1, oder wenn ein Hinweistext gegeben werden soll: =Tabelle2!A1&"Sprung zu Tab2"
Wenn du jetzt unter EXTRAS - OPTIONEN - BEARBEITEN das Häkchen bei "direkte Zellbearbeitung" rausnimmst, springt Excel bei Doppelklick auf die Zelle zu dem referenzierten Zellbereich.
Das hat folgende Vorteile:
- beim Umbenenen von Tabellenblättern passt sich der Zellbezug automatisch an
- ebenso passt sich der Zellbezug automatisch an, wenn innerhalb der Zielzelle Zellen eingefügt oder gelöscht werden und sich die Zielzelle verschiebt
- muß in dem Zellbezug trotzdem noch was manuell geändert werden und es gilt führ mehrere Zellen, kann man das auch einfach per BEARBEITEN - ERSETZTEN erledigen.
Gruß, Daniel

Anzeige
AW: Hyperlinks automatisch ändern
13.11.2007 17:57:25
Christian
Hallo Daniel,
danke für den Vorschlag.
Dies geht allerdings nicht, wenn die Zielfelder einen Inhalt haben. Dann erscheint ja immer der Inhalt auf dem entsprechenden Link-Feld.
Deswegen wäre mir da eine VBS-Lösung mit echten Hyperlinks lieber.
Viele Grüße
Christian

Anzeige
AW: Hyperlinks automatisch ändern
13.11.2007 22:49:03
Daniel
Hi
macht ja nichts, wenn die Felder Inhalt haben.
du kannst ja auch so ne Formel reinschreiben:

=wenn(oder(Tabelle1!A1="";Tabelle1!A1"");"Tabelle1 auswählen";"")


damit ist es dann egal, was dort steht.
Hyperlinks wären mir einfach viel zu umständlich zu bearbeiten.
Gruß, Daniel

Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Hyperlinks in Excel automatisch anpassen


Schritt-für-Schritt-Anleitung

Um Hyperlinks in Excel automatisch anzupassen, kannst du ein VBA-Skript verwenden. Hier ist eine einfache Anleitung:

  1. Öffne die Excel-Datei, in der du die Hyperlinks ändern möchtest.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Füge ein neues Modul hinzu:

    • Klicke mit der rechten Maustaste auf "VBAProject (deinDateiname)".
    • Wähle "Einfügen" > "Modul".
  4. Kopiere den folgenden VBA-Code in das Modul:

    Sub Hyperlinks_Automatisch_Ändern()
       Dim hl As Hyperlink
       Dim ws As Worksheet
       Dim neuerTag As String
    
       neuerTag = "Dienstag" ' Ändere den Tag hier
    
       For Each ws In ThisWorkbook.Worksheets
           If ws.Name = neuerTag Then
               For Each hl In ws.Hyperlinks
                   hl.Address = Replace(hl.Address, "Montag", neuerTag)
               Next hl
           End If
       Next ws
    End Sub
  5. Passe die Variable neuerTag an den gewünschten Wochentag an.

  6. Führe das Makro aus: Drücke F5 oder gehe auf "Run" > "Run Sub/UserForm".

Mit diesem Skript kannst du die Hyperlinks in deiner Excel-Datei automatisch ändern.


Häufige Fehler und Lösungen

  • Fehler: Hyperlinks werden nicht aktualisiert

    • Stelle sicher, dass das Makro in der richtigen Datei ausgeführt wird und die Namen der Tabellenblätter korrekt sind.
  • Fehler: Makro läuft nicht

    • Überprüfe, ob die Makros in Excel aktiviert sind. Gehe zu "Datei" > "Optionen" > "Trust Center" > "Einstellungen für das Trust Center" und aktiviere die Makros.

Alternative Methoden

Wenn du keine VBA-Lösungen verwenden möchtest, kannst du auch auf Formeln zurückgreifen. Anstatt Hyperlinks zu erstellen, könntest du Zellreferenzen nutzen:

  1. Formel verwenden:

    • Zum Beispiel: =Tabelle2!A1
    • Dies ermöglicht es, bei Änderungen an den Tabellenblättern automatisch die Referenzen anzupassen.
  2. Direkte Zellbearbeitung deaktivieren:

    • Gehe zu "Extras" > "Optionen" > "Bearbeiten" und entferne das Häkchen bei "Direkte Zellbearbeitung", um das Navigieren zu erleichtern.

Praktische Beispiele

Hier sind drei Beispiele, wie du Hyperlinks in Excel ändern kannst:

  1. Beispiel 1: Ändern eines Hyperlinks von "Montag" auf "Dienstag".

    • Verwende das oben genannte VBA-Skript, um Hyperlinks in mehreren Blättern gleichzeitig zu ändern.
  2. Beispiel 2: Zellreferenz für einen Link nutzen.

    • Wenn du in Zelle A1 auf "Tabelle2" verweisen möchtest: =Tabelle2!A1.
  3. Beispiel 3: Hinweistext mit Zellreferenz.

    • Kombiniere Text und Zellreferenz: =Tabelle2!A1 & " - Sprung zu Tab2".

Tipps für Profis

  • Benutze benannte Bereiche: Statt Hyperlinks zu verwenden, kannst du benannte Bereiche erstellen, um die Navigation zu vereinfachen.
  • Makros speichern: Speichere dein VBA-Skript in der Datei, um es bei Bedarf schnell wieder zu verwenden.
  • Regelmäßige Sicherungen: Mache regelmäßig Sicherungen deiner Excel-Datei, besonders wenn du mit Makros arbeitest.

FAQ: Häufige Fragen

1. Wie kann ich alle Hyperlinks in einer Excel-Datei ändern?
Mit VBA kannst du alle Hyperlinks in der Datei anpassen, indem du das Skript oben anpasst.

2. Gibt es eine Möglichkeit, Hyperlinks ohne VBA zu ändern?
Ja, du kannst Zellreferenzen verwenden, um Hyperlinks zu ersetzen, allerdings wird der Zugriff auf die Zielzellen visuell anders sein.

3. Was tun, wenn die Hyperlinks nach dem Kopieren eines Blattes nicht funktionieren?
Überprüfe die Blattnamen und stelle sicher, dass die Hyperlinks korrekt auf die neuen Blätter verweisen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige