Registriert seit: 30.08.2016
Version(en): Office 2010
Hallo Leute
Ich habe leider nicht viel Ahnung von Excel und noch viel weniger von VBA.
Muß aber ein Problem lösen.
Ich habe auf einem Tabellenblatt, 12 Befehlsschaltflächen Active X, ohne Namen(Caption). Mit einem anderen Button erstelle ich neue Tabellenblätter und weise diesen einen Namen aus einer Zelle zu. Der gleiche Name wird an die erste Befehlsschaltfläche ohne Namen vergeben. Jetzt möchte ich mit dieser Befehlsschaltfläche das gleichnamige Tabellenblatt öffnen. Aber wie? Ich dachte in Richtung
Sub TabelleOeffnen()
Dim strTabellenBlatt as String
strTabellenBlatt = ???????????? cmdButton1.Caption
Worksheets(strTabellenBlatt).Activate
End Sub
Ich hoffe jemand kennt o. findet eine Lösung.
Viele Grüße Sagulum
Registriert seit: 11.04.2014
Version(en): Office 2007
Gruß Stefan
Win 10 / Office 2016
Registriert seit: 11.04.2014
Version(en): '97 bis 2016; 365
08.09.2016, 18:56
(Dieser Beitrag wurde zuletzt bearbeitet: 08.09.2016, 18:56 von Käpt'n Blaubär.)
Hallo,
mal eine leicht verruchte Anfrage,
... und was für Funktionen haben die Buttons?
... und wie weißt Du nach vier Wochen Urlaub noch, welcher Button für was zuständig ist?
Im Übrigen benutzt Du doch Aktive X-Buttons. Da muß man keine Klimmzüge machen, die
lassen sich bequem direkt programmieren.
________________________________________________________________________
wer aufgibt, ohne es versucht zu haben, gibt einfach nur auf!
Grüße aus Norderstedt, Peter
Registriert seit: 30.08.2016
Version(en): Office 2010
08.09.2016, 20:14
(Dieser Beitrag wurde zuletzt bearbeitet: 08.09.2016, 20:14 von Sagulum.)
Hallo
Also ich versuchs mal anders zu beschreiben. Ich will auf einem Tabellenblatt in je eine Zelle einen Namen und eine Nummer eintragen. Mit einem Klick auf einem Button soll ein Tabellenblatt erstellt werden. Das erstellte Tabellenblatt bekommt den Namen aus der Zelle. Weiterhin wird ein weiterer vorhandener Button ohne Namen(Caption) mit dem gleichen Namen versehen den das soebend erstellte Tabellenblatt bekommen hat. Bis hier hin funktioniert mein Code.
Jetzt soll mit dem Button(der gerade einen neuen Namen bekommen hat) das Gleichnamige Tabellenblatt aktiviert werden. Der Code für die Buttons sollte also so gestaltet sien, das ein neuer Name(Caption) des Buttons ein Tabellenblatt mit dem Namen(Caption) des Buttons aktivieren kann.
Käpt`n Blaubär
Die 12 Button stehen einfach bereit um einen Namen zu bekommen und später das zugehörige Tabellenblatt zu aktivieren.
Leider kann ich den Aktive x Button nicht so einfach programieren, da fehlt mir einiges an Grundlagenwissen.
Es grüßt Sagulum
Registriert seit: 20.06.2016
Version(en): 2021
Hallo sagulum,
hiermit:
Code:
Private Sub CommandButton1_Click()
Sheets(ActiveSheet.CommandButton1.Caption).Activate
End Sub
helmut
Für mich ist die Möglichkeit in Excel an Zellen und Bereichen Namen zu vergeben die wichtigste Funktionalität.
Sie macht Formeln und den VBA-code verständlicher. Für Makros gilt die Regel: "Nur über benannte Bereiche auf den Inhalt der Zellen zugreifen."
Und wofür sind Regeln da? Um nachzudenken bevor man sie bricht.