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

Sheetname / Pivot Feldname per Parameter übergeben

Forumthread: Sheetname / Pivot Feldname per Parameter übergeben

Sheetname / Pivot Feldname per Parameter übergeben
22.08.2005 08:45:26
Marc
Hallo
Wenn ich ein Tabellenblatt auswähle, dann entweder über sheets(1) oder sheets("name"). Kann ich den Namen auch als Parameter an die Funktion übergeben und in der Anweisung sheets(parameter) verwenden?
Dasselbe Problem habe ich beim Verändern von Pivot Tabellen:
With ActiveSheet.PivotTables("PivotTable1").PivotFields("Feld").PivotItems(i).Visible = True
End With
z.B. Parameter i = "07"
Danke schon mal für die Hilfe.
Marc
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Sheetname / Pivot Feldname per Parameter überg
22.08.2005 09:08:51
Ramses
Hallo
Ja das geht
x = "Tabelle2"
worksheets(x).Select
Gruss Rainer
AW: Sheetname / Pivot Feldname per Parameter übergeben
22.08.2005 09:09:22
volker
Klar!
Die beiden Subs test und tabellenblattaktivieren(blattname)
machen genau das was ausgangsproblem macht, nur mit Übergabe des Tabellennamens.

Sub ausgangsproblem
Sheets("Tabelle1").Activate
End Sub


Sub test
Call tabellenblattaktivieren("Tabelle1")
End Sub


Sub tabellenblattaktivieren(blattname)
Sheets(blattname).Activate
End Sub

Hilfts weiter?
Volker
Anzeige
AW: Sheetname / Pivot Feldname per Parameter überg
22.08.2005 12:27:54
Marc
Hat geklappt.
Danke für die schnelle Hilfe.
Marc
;

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