Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Zwei Optionen = ein Ereignis

Forumthread: Zwei Optionen = ein Ereignis

Zwei Optionen = ein Ereignis
01.03.2003 18:34:34
Claus
Hi!

Ich habe in einer UserForm zwei OptionButtons.
Der erste soll hinter einen Text, der in einer LabelBox steht, ein X einfügen. Der zweite soll ein Y einfügen.

Das klappt auch soweit, aber wenn ich den ersten Button drücke und danach den zweiten, bekomme ich sowas:

"LabelText" XY

Ich möchte aber, das der klick auf den OptionsButton eine vorher gesetzte Option überschreibt...Wie geht denn das nun wieder?

Claus...

Private Sub OptionButton1_Click()
If OptionButton1 = True Then
Label.Caption = Label & " X"
End If
End Sub

Private Sub OptionButton2_Click()
If BackOptionButton = True Then
Label.Caption = Label & " Y"
End If
End Sub

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Zwei Optionen = ein Ereignis
01.03.2003 18:39:36
Ramses

Hallo,

Private Sub OptionButton1_Click()
If OptionButton1 = True Then
Me.Labelx.Caption = Left(Me.Labelx.Caption,Len(Me.Labelx.Caption)-2) & " X"
End If
End Sub

Private Sub OptionButton2_Click()
If BackOptionButton = True Then
Me.Labelx.Caption = Left(Me.Labelx.Caption,Len(Me.Labelx.Caption)-2) & " Y"
End If
End Sub

Das "x" in Label bitte gegen die Bezeichnung bei dir anpassen.

Gruss rainer



Anzeige
Re: Zwei Optionen = ein Ereignis
01.03.2003 18:52:01
Claus

Damit hast Du Dir den goldenenen VBA-Orden verdient!!! Danke...

Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18