Msgbox mit Auswahl

25/10/2007 - 17:37 von wodur | Report spam
Hallo Crackz !
würde gerne eine Msgbox beim öffnen eines Excelsheets haben, wo
ich 2 Buttons habe. Wenn ich den einen Button drücke wird ein
Radiobutton im Excelsheet ausgefüllt bzw markiert, beim klicken des
anderen Buttons der Message am Anfang ein anderer ! Das ist mein
erstes Problem :(

Mein 2tes Problem ist, das nach dem auswàhlen des Radio buttons der
Status nicht mehr geàndert werden darf, sprich also eine Meldung kommt
das zwischen den Radiobuttons nicht mehr gewechselt werden kann, weil
ja schon am Anfang ausgewàhlt...und/aber nichts weiter passiert
als die Meldung kommt und der Rtadiobutton auf dem Status der beim
Öffnen ausgewàhlt wurde bleibt..

Danke für eure Super Hilfe !
 

Lesen sie die antworten

#1 Melanie Breden
26/10/2007 - 09:02 | Warnen spam
Hallo,

wodur schrieb:
würde gerne eine Msgbox beim öffnen eines Excelsheets haben, wo
ich 2 Buttons habe. Wenn ich den einen Button drücke wird ein
Radiobutton im Excelsheet ausgefüllt bzw markiert, beim klicken des
anderen Buttons der Message am Anfang ein anderer ! Das ist mein
erstes Problem :(

Mein 2tes Problem ist, das nach dem auswàhlen des Radio buttons der
Status nicht mehr geàndert werden darf, sprich also eine Meldung kommt
das zwischen den Radiobuttons nicht mehr gewechselt werden kann, weil
ja schon am Anfang ausgewàhlt...und/aber nichts weiter passiert
als die Meldung kommt und der Rtadiobutton auf dem Status der beim
Öffnen ausgewàhlt wurde bleibt..



ein Meldungsfenster hat nur die Schaltflàchen Ja, Nein und Abbrechen.
Daraus könnte man z.B. Folgendes machen:

Private Sub Workbook_Open()
Dim lngAnswer As Long

lngAnswer = _
MsgBox("Drücke 'Ja' für Radiobutton1, 'Nein' für Radiobutton2", _
vbYesNo + vbExclamation)

With Worksheets("Tabelle1")
' Steuerelemenete einstellen
.OptionButton1.Value = lngAnswer = vbYes
.OptionButton2.Value = lngAnswer = vbNo
' Steuerelemenete deaktivieren
.OptionButton1.Enabled = False
.OptionButton2.Enabled = False
End With
End Sub

Speicher die Prozedur im Codemodul "DieseArbeitsmappe".

Mit freundlichen Grüssen
Melanie Breden

- Microsoft MVP für Excel -
www.melanie-breden.de

Ähnliche fragen