HERBERS Excel-Forum - die Beispiele

Thema: Zum aufrunfenden Blatt zurück

Home

Gruppe

Allgemein

Problem

Die Hyplinks in den Zellen A1 der Blätter Tabelle1 und Tabelle2 führen zu Tabelle3. Die Zurück-Schaltfläche in Tabelle3 soll in das jeweilige aufrufende Blatt zurückführen.

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
ClassModule: Tabelle1

Private Sub Worksheet_Activate()
   ThisWorkbook.Worksheets("Dummy").Range("A1").Value = Me.Name
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   ThisWorkbook.Worksheets("Dummy").Range("B1").Value = Target.Address
End Sub
ClassModule: Tabelle2

Private Sub Worksheet_Activate()
   ThisWorkbook.Worksheets("Dummy").Range("A1").Value = Me.Name
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   ThisWorkbook.Worksheets("Dummy").Range("B1").Value = Target.Address
End Sub

StandardModule: Modul1

Sub GoBack()
   With ThisWorkbook.Worksheets("Dummy")
      Worksheets(.Range("A1").Value).Select
      Range(.Range("B1").Value).Select
   End With
End Sub

Sub Ausblenden()
   Worksheets("Dummy").Visible = xlVeryHidden
End Sub

Beiträge aus dem Excel-Forum zu den Themen Allgemein und Hyperlink

Hyperlink per Code aktivieren, gibt Fehlerhinweis xlDialogInsertHyperlink.show
Hyperlinks in Excel Hyperlink auf Excel-Datei funktioniert nicht
Hyperlinks automatisch starten Hyperlink zu Wordtabelle mit Textmarke
Hyperlink variabel Hyperlink - UserForm
Hyperlink öffnet Arbeitsmappe mit Parametern Hyperlinks finden
Hyperlink zurückwandeln? Hyperlink zurückwandeln?
Hyperlink zurückwandeln? Hyperlink
Hyperlink als Button Hyperlink öffnen - URL in Zelle
Hyperlink ... Verkürzung der Verzeichnisauswahl Hyperlinks - Standardordner ändern
Hyperlink Hyperlink
Hyperlinks Hyperlink
Prüfen ob Hyperlink Allgemeine Frage zur Fehlerbehandlung
Hyperlink und nachträglich Zeilen einfügen allgemeine Fragen zu einer Datenbank
ComboBox mit Hyperlink ListBox1_DblClick Hyperlink öffnen
Hyperlink mit Abfrage hinzufügen Hyperlink als Text
Hyperlink entfernen und Zelle einfärben ? Dateinamen auslesen - aber nicht Hyperlink
Bilder mit Hyperlink Excel: Bei Schutz Gruppierung/Hyperlink/Sortierung
Hyperlink auf Bereich in Arbeitsblatt Hyperlinks per VBA - Dokument defekt?
Hyperlink - Datei wird ausgeblendet Hyperlink verwirrung
Hyperlink nicht starr (absolut) Hyperlink
Hyperlinks innerhab einer Mappe (kein Dateipfad) Hyperlink von Excel zu Word
Hyperlink-Probleme Hyperlink
per Makro Hyperlink generieren Hyperlink auf anderes Tabellenblatt mit VBScript
Hyperlink von Zelle auf anderes Tabellenblatt hyperlink als email mit betreff und cc aus spalte
Hyperlink via WENN-Fkt aktivieren