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

Userform

Forumthread: Userform

Userform
31.03.2020 20:17:10
Karsten
Hallo,
ich möchte per VBA Buttons in ein UserForm einfügen und komme da nicht weiter. Kann mir jemand helfen?
Vielen Dank
Karsten
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Userform
31.03.2020 20:25:40
Patrick
Möchtest du diese per Code einfügen lassen, nach einem bestimmten Vorgang oder soll die Frage viel allgemeiner sein? Wie man überhaupt Buttons in eine Userform einfügt?
AW: Userform
01.04.2020 11:48:35
Karsten
Hallo Patrick,
Danke für Deine Rückmeldung. Ich habe in einem Tabellenblatt die Möglichkeit anzukreuzen, welche Buttons ich haben will (1-8). Für alle, die angekreuzt sind, soll das Programm im Userform1 einen CommandButton erstellen. Ich habe aber auch schon eine andere Möglichkeit gefunden: Ich erstelle manuell 8 Buttons und blende diese über die Eigenschaft "visible" einfach aus, wenn sie nicht gebraucht werden.
Anzeige
AW: Button auf Userform einfügen
01.04.2020 09:12:20
Dieter(Drummer)
Guten Morgen Karsten,
habe da etwas im Netz gefunden. Lies es aber vorher durch ...
Wäre auch schon, wenn Du auf die Antwort/Frage von Patrick, ihm eine Rückantwort geben würdest.
Gruß Dieter(Drummer)
Evtl. Lösung aus:
http://www.office-loesung.de/ftopic315196_0_0_asc.php
Und so erstellst du einen CommandButton, der dann auch bleibt:
Sub CreateNewCmd()
Dim NewCommandButton As CommandButton
Set NewCommandButton = ThisWorkbook.VBProject.VBComponents("Userform1").designer.Controls.Add("  _
_
Forms.CommandButton.1")
NewCommandButton.Name = "Irgendeinna2me"
NewCommandButton.Caption = Range("A1").Text
NewCommandButton.Top = 2
NewCommandButton.Left = 2
NewCommandButton.Width = 180
NewCommandButton.Height = 30
End Sub

Anzeige
AW: Button auf Userform einfügen
01.04.2020 11:50:28
Karsten
Hallo Dieter,
vielen Dank für Deine Rückmeldung.
Es funktioniert!
Gruß
Karsten
;

Beliebteste Forumthreads (12 Monate)

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