CheckBox

Forumthread: CheckBox

CheckBox

15.04.2014 20:51:11

Werner

Hallo zusammen,
das nachfolgende Makro fuktioniert soweit ganz gut.

Private Sub CommandButton1_Click()
CheckBox1 = True
CheckBox2 = True
CheckBox3 = True
CheckBox4 = True
End Sub

Nun möchte ich noch eine Abfrage(Bedingung) einbauen,und zwar.....

Private Sub CommandButton1_Click()
If A1=1 Then CheckBox1 = True
If A2=1 Then CheckBox2 = True
CheckBox3 = True
CheckBox4 = True
End Sub

Über eine Lösung würde ich mich sehr freuen.
Viele Grüße
Werner

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: CheckBox

15.04.2014 21:08:03

Der
AW: CheckBox

15.04.2014 21:20:56

Werner
Danke für die Rückmeldung. owT

15.04.2014 21:37:31

Der
AW:oder so

16.04.2014 11:04:15

hary

AW: CheckBox

15.04.2014 21:08:03

Der

Hallo Werner,
etwa so?

Private Sub CommandButton1_Click()
If Range("A1") = 1 Then
CheckBox1 = True
Else
CheckBox1 = False
End If
If Range("A2") = 1 Then
CheckBox2 = True
Else
CheckBox2 = False
End If
CheckBox3 = True
CheckBox4 = True
End Sub

Gruß Uwe

AW: CheckBox

15.04.2014 21:20:56

Werner

Hallo Uwe,
so geht das,herzlichen Dank.
Gruß Werner

Danke für die Rückmeldung. owT

15.04.2014 21:37:31

Der

AW:oder so

16.04.2014 11:04:15

hary

Moin
Oder einfach.

CheckBox1 = Range("A1") = 1
CheckBox2 = Range("A2") = 1
CheckBox3 = True
CheckBox4 = True

gruss hary

Forumthread: CheckBox

4 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread