Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1820to1824
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
Inhaltsverzeichnis

Tabellenblätter über Codename ansprechen

Tabellenblätter über Codename ansprechen
30.03.2021 07:38:11
Leon
Ich möchte mehrere Tabellenblätter selektieren und ausdrucken.
Da die Mitarbeiter ganz gerne mal die Blattnamen ändern, sollen diese über ihre Codenamen angesprochen werden.
Sub gruppieren()
ThisWorkbook.Sheets(Array(Tabelle2, Tabelle4)).Select
Application.Dialogs(xlDialogPrint).Show
End Sub
"Tabelle2" und "Tabelle4" sind die von Excel vergebenen Codenamen.
Der verwendete Code erzeugt Laufzeitfehler 13 (Typen unverträglich).

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

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblätter über Codename ansprechen
30.03.2021 07:50:08
Klaus
Hallo Leon,
der Makrorekorder ist dein Freund! Jener macht:
Sheets(Array("Tabelle2", "Tabelle4")).Select
An den Anführungsstrichen siehst du, dass hier nicht der Codename des Blattes, sondern der eigene Name des Blattes angesprochen wird. Daraus folgt:
Sheets(Array(Tabelle2.Name, Tabelle4.Name)).Select
spricht über den Codenamen das korrekte Blatt an.
LG,
Klaus M.

Tabellenblätter über Codename ansprechen
30.03.2021 08:06:25
Leon
Hallo Klaus,
Sheets(Array(Tabelle2.Name, Tabelle4.Name)).Select
da stand offenbar jemand auf der Leitung...
Vielen Dank für Deine schnelle Hilfe. Hat alles bestens funktioniert.
Viele Grüße,
Leon
Anzeige

97 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige