|
Hallo zusammen,
ich versuche mich grad an meiner ersten Userform.
Ich möchte eine Userform in Excel mit 2 Buttons (ähnlich wie die yes/no Mesgbox) erstellen.
Der Nutzer soll per Schaltfläche daruaf klicken und dann soll eine Message mit der Fragen kommen was der Nutzer möchte.
"Möchtest du A oder B ?"
Dann jeweils ein Button mit A und B erscheinen.
Bei klick auf A oder B solen Werte aus der Zwischenablage in Spalte X eingefügt werden.
Dann soll die Abfrage erneut gestellt werden, wobei diesmal bei A und auch bei B die Werte in Spalte Y eingefügt werden.
Danach soll die Userform und das ganze Program beendet werden.
Ich kriege es einfach nicht hin. Das habe ich im Formular...
Private Sub A_Click()
MsgBox " Copy Data into clipboard" & vbCrLf & vbCrLf & " Click OK", , "1. Values"
Sheets("Deviation").Select
Range("X1").Select
ActiveSheet.Paste
MsgBox " Copy Data into clipboard" & vbCrLf & vbCrLf & " Click OK", , "2. Values"
Sheets("Deviation").Select
Range("Y1").Select
ActiveSheet.Paste
End Sub
Das Formular rufe ich mir auf mittels
Sub Formular_starten()
Formular.Show
End Sub
Das Problem ist aber, dass er mir die Userform am Ende nicht beendet und immer wieder die Abfrage "Möchtest du A oder B ?" kommt.
Also die Abfrage soll ja nur einmal am Anfang kommen, dann die Message Box mit der Aufforderung Daten in die Zwischenablage zu kopieren und OK zu drücken. DANN soll die Abfrage nochmal kommen, danach wieder eine Message Box und danach soll das Ganze beendet werden.
Wäre super, wenn ihr mir bei meiner ersten Userform helfen könntet.
VG,
Alex
|