Office: (Office 2010) Neues Tabellenblatt öffnen mit einem Formularsteuerelement

aerofly2011 · 30. Mai 2019

Hallo zusammen,

ich sitze verzweifelt an einem Excel-Tool (vgl. Anhang). Ich möchte gerne eine Vermögensstruktur darstellen. Auf dem Tabellenblatt "Ist-Vermögenstrukturierung) habe ich über die Formularsteuerelemente ein Auswahlelement eingefügt. Wenn ich die einzelnen Elemente "Einkommen", "Ausgewogen" und "Wachstum" auswähle, soll jeweils das entsprechende Tabellenblatt automatisch geöffnet werden. D.h. wird "Einkommen" ausgewählt, dann soll sich das Tabellenblatt "Einkommen" öffnen. Kann mir bitte jemand weiterhelfen, wie ich diese Vorhaben verwirklichen kann?
Im Voraus herzlichen Dank.
Liebe Grüße & noch einen schönen Abend
Stefan

:)

Mase · 1. Juni 2019

Hi,

schau mal hier...
https://www.ms-office-forum.net/foru...d.php?t=289369

So kannst Du die Dropdowns auflisten/ansprechen.

Mit
Code:

Sheets("Blattname").activate
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Kannst das Tabellenblatt aktivieren.

Mit
Code:

SELECT CASE cbbElement.Value
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

entsprechend auf die Auswahl reagieren

Beverly · 1. Juni 2019

Hi Stefan,

schreibe folgendes Makro in ein Standardmodul

Code:

Sub Auswahl()
Dim strTab As String
With ActiveSheet.Shapes(Application.Caller)
strTab = Range(.ControlFormat.ListFillRange).Cells(.ControlFormat.ListIndex)
Worksheets(strTab).Activate
End With
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

und weise es dem Kombinationsfeld zu - Rechtsklick auf das Kombinationsfeld -> Makro zuweisen...

aerofly2011 · 2. Juni 2019

Hallo Beverly,
super. Herzlichen Dank. Es hat funktioniert.
Wie kann ich denn den Code ergänzen, wenn ich möchte, dass nach dem Anklicken z.B. von "Wachstum", dann öffnet das Makro ja automatisch das Tabellenblatt "Wachstum", im Formularsteuerelement auf dem ersten Tabellenblatt, ein zusätzliches Feld erscheint "Bitte Strategie auswählen". D.h. nach jedem Anklicken von Wachstum, Ausgewogen oder Wachstum, soll immer automatisch "Bitte Strategie auswählen" erscheinen?
Nochmal vielen Dank & noch einen schönen, sonnigen Sonntag
Liebe Grüße
Stefan

Beverly · 2. Juni 2019

Hi Stefan,

dann musst du in R4 den Begriff "Bitte Strategie wählen" schreiben, dem Kombnationsfeld als Eingabebereich R4:R7 zuweisen und das Makro wie folgt ändern:

Code:

Sub Auswahl()
Dim strTab As String
With ActiveSheet.Shapes(Application.Caller)
If .ControlFormat.ListIndex > 1 Then
strTab = Range(.ControlFormat.ListFillRange).Cells(.ControlFormat.ListIndex)
Worksheets(strTab).Activate
End If
.ControlFormat.ListIndex = 1
End With
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

aerofly2011 · 2. Juni 2019

Hallo Karin,

Du bist super. Herzlichen Dank, es hat wunderbar funktioniert.

Liebe Grüße und noch einen schönen Sonntagabend

Stefan

aerofly2011 · 2. Juni 2019

Hallo Marco,

vielen Dank für Deine Antwort.

Liebe Grüße und noch einen schönen Sonntagabend

Stefan

Office: (Office 2010) Neues Tabellenblatt öffnen mit einem Formularsteuerelement

Neues Tabellenblatt öffnen mit einem Formularsteuerelement

Neues Tabellenblatt öffnen mit einem Formularsteuerelement

Neues Tabellenblatt öffnen mit einem Formularsteuerelement

Neues Tabellenblatt öffnen mit einem Formularsteuerelement - Similar Threads - Tabellenblatt öffnen Formularsteuerelement

Excel Files öffnen und Tabellenblätter kopieren

Userform mit Tabellenblatt öffnen

Ordner nach Dateien durchsuchen und als Tabellenblatt öffnen

Beim öffnen der Exceldatei Tabellenblatt mit aktuellem Monat auswählen.

Userform beim öffnen anzeigen und "Focus" auf das Tabellenblatt setzen

Makro um Tabellenblätter aus mehreren Dateien zu öffnen und aufzuaddieren

Makro bei Öffnen des Tabellenblatts starten