Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
Screenshot zu MsgBox	MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Informationen und Beispiele zum Thema CommandButton
Screenshot zu CommandButton	CommandButton-Seite mit Beispielarbeitsmappe aufrufen

Informationen und Beispiele zum Thema Userform
Screenshot zu Userform	Userform-Seite mit Beispielarbeitsmappe aufrufen

Informationen und Beispiele zum Thema OptionButton
Screenshot zu OptionButton	OptionButton-Seite mit Beispielarbeitsmappe aufrufen

Informationen und Beispiele zum Thema ScrollBar
Screenshot zu ScrollBar	ScrollBar-Seite mit Beispielarbeitsmappe aufrufen

Informationen und Beispiele zum Thema SpinButton
Screenshot zu SpinButton	SpinButton-Seite mit Beispielarbeitsmappe aufrufen

Informationen und Beispiele zum Thema TextBox
Screenshot zu TextBox	TextBox-Seite mit Beispielarbeitsmappe aufrufen

Makro per Button Starten/Beenden

• Makro per Button Starten/Beenden von Steffen vom 21.05.2008 15:36:56
• AW: Makro per Button Starten/Beenden - von selli am 21.05.2008 15:40:59
• AW: Makro per Button Starten/Beenden - von Sonnenpeter am 21.05.2008 15:48:52
  • AW: Makro per Button Starten/Beenden - von Sonnenpeter am 21.05.2008 16:19:23
• AW: Makro per Button Starten/Beenden - von Reinhard am 21.05.2008 17:04:19
  • AW: Makro per Button Starten/Beenden - von Steffen am 21.05.2008 17:28:33

Betrifft: Makro per Button Starten/Beenden von: Steffen
Geschrieben am: 21.05.2008 15:36:56

Hallo zusammen,

Ich möchte auf einer Userform mit einem Button ein Makro starten. Der Buttontext soll sich entsprechend von Start auf Ende umstellen.

Sprich: beim ersten Klick soll er das Makro starten und das Makro soll so lange laufen bis ich erneut auf den Button drücke.

Wie kann ich sowas in VBA umsetzen?

Vielen Dank im Vorraus.

Gruß Steffen

Betrifft: AW: Makro per Button Starten/Beenden von: selli
Geschrieben am: 21.05.2008 15:40:59

hallo steffen,

in der regel läuft ein makro so lange, wie es im makro drinsteht. ohne es zu sehen kann man da schlecht sagen, was da wie und wann unterbrochen werden muss. ist es eine ewige schleife?

den buttontext änderst du so:

userform1.commandbutton1.caption="blabla"

gruß selli

Betrifft: AW: Makro per Button Starten/Beenden von: Sonnenpeter
Geschrieben am: 21.05.2008 15:48:52

Hallo,

Sub Test()
MsgBox "Makro tue das EINE"
ActiveSheet.Shapes("Button 1").OnAction = "Test2"
End Sub

Sub Test2()
MsgBox "Makro tue das ANDERE"
ActiveSheet.Shapes("Button 1").OnAction = "Test"
End Sub

Gruß Sonnenpeter

Betrifft: AW: Makro per Button Starten/Beenden von: Sonnenpeter
Geschrieben am: 21.05.2008 16:19:23

Ups,

ich sollte richtig Lesen!

Gruß Sonnenpeter

Betrifft: AW: Makro per Button Starten/Beenden von: Reinhard
Geschrieben am: 21.05.2008 17:04:19

Hi Steffen,

Private Sub CommandButton3_Click()
CommandButton2.Visible = True
CommandButton3.Caption = IIf(CommandButton3.Caption = "Start", "Ende", "Start")
While CommandButton3.Caption = "Ende"
   Range("A1") = Range("A1") + 1
   DoEvents
Wend
End Sub

Private Sub UserForm_Initialize()
CommandButton3.Caption = "Start"
End Sub

Gruß
Reinhard

Betrifft: AW: Makro per Button Starten/Beenden von: Steffen
Geschrieben am: 21.05.2008 17:28:33

Super, haut hin.


Danke euch!

Beiträge aus den Excel-Beispielen zum Thema "Makro per Button Starten/Beenden"