Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
412to416
412to416
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Hyperlink

Forumthread: Hyperlink

Hyperlink
Thomas
In einer Excel-Arbeitsmappe habe ich bis zu 22 Tabellen.
Jede Tabelle ist mit Vornamen und Nachnamen definiert.
Wie kann ich in Tabelle 1 die Links zu allen 21 Tabellennamen setzen ?
Monatlich ändern die Tabellen-Namen und die Links sollten mittels VBA aktualisiert werden können.
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Hyperlink
anderer
Wenn Du einen Hyperlink zu einer bestimmten Tabelle erzeugt hast,
dann wird der Link beim Ändern des Tabellennamens normalerweise
automatisch aktualisiert...
AW: Hyperlink
thomas
Vielen Dank anderer Thomas
Gibt es aber nicht auch etwas VBA-Mässiges, denn ab und zu kommt es vor, dass Tabellen gelöscht werden.
Danke im Voraus
Anzeige
Hyperlink
Kl@us-M.
Hi Thomas,
leg mal ein Tabellenblatt mit Namen "Inhaltsverzeichnis"an und probier:

Sub Tabellennamen_auslesen()
Columns("A:A").ClearContents
For i = 1 To Worksheets.Count
Sheets("Inhaltsverzeichnis").Cells(i, 2).Value = Sheets(i).Name 'TabBlattName anpassen
Next
MsgBox ("Es befinden sich ") & ThisWorkbook.Worksheets.Count & (" Tabellenblätter in dieser Arbeitsmappe."), vbOKOnly, "PSD.xls"
End Sub

Gruss aus dem Hunsrück
Klaus-Martin
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige