Herbers Excel-Forum - das Archiv

Button in Userform

Informationen und Beispiele zu den hier genannten Dialog-Elementen:


Excel-Version: 97
nach unten

Betrifft: Button in Userform
von: Peter


Geschrieben am: 07.05.2002 - 15:36:16

Hallo,
mein problem ist folgendes:
ich habe mit VBA eine Userform mit unter anderem auch einem Commandbutton.
Sieh so aus.
Set okbutton = Me.Controls.Add("Forms.commandbutton.1", "okbutton", True)
With okbutton
.Left = 360
.Top = 355
.Width = 60
.Height = 20
.FontSize = 8
.Caption = "Schliessen"
End With

jetzt Frage ich ab:
Private Sub okbutton_Click()
Unload Me
End Sub

und das funzt nicht.Keine Reaktion.

msgbox okbutton.visible=true ergibt wahr.
Was ist falsch ?
Danke vorab Peter

nach oben   nach unten

Re: Button in Userform
von: Nike
Geschrieben am: 07.05.2002 - 19:30:20

Hi,

vielleicht hilft eher

Private Sub CommandButton1_Click()
Unload Me
End Sub

Bye

Nike


nach oben   nach unten

Geht nicht, schon probiert o.T.
von: Peter
Geschrieben am: 07.05.2002 - 20:34:17

.

nach oben   nach unten

Geht nicht, schon probiert o.T.
von: Peter
Geschrieben am: 07.05.2002 - 20:34:19

.

 nach oben

Excel-Beispiele zum Thema "Button in Userform"
Zeilen bedingt durch SpinButton verschieben Maximalwert eines SpinButtons nach Zellwert festlegen
Auf UserForm-CommandButton-Klick eine Internetseite aufrufen Zelleintrag durch OptionButton-Betätigung ein- und ausschalten
Zellwerte über SpinButton und ScrollBar hochzählen UserForm mit SpinButton zur Datenreiheneinstellung aufrufen
CommandButtons in verschiedenen Tabellen mit einem Makro Auflisten von OptionButtons in Kontextmenü
Button im selektierten Bereich erstellen und Makro zuweisen Über SpinButton in UserForm-TextBox einlesen