Checkbox auf true wenn text in der zelle

Forumthread: Checkbox auf true wenn text in der zelle
7 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Checkbox auf true wenn text in der zelle

29.10.2014 09:08:46

Achim

Hallo excel freunde
komme einfach nicht weiter.
wenn in der Zelle text vorhanden ist soll ein häckchen in der Checkbox gesetzt werden.
habe mein Glück versucht. Leider ohne Ergebnis.
If Sheets("SchülerGrundlagendaten").Range("G5").Value _
Then CheckBox1 = True
gruss Achim

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: keine Rueckmeldungen!?

29.10.2014 09:13:44

hary
AW: keine Rueckmeldungen!?

29.10.2014 09:18:15

Achim
AW: so

29.10.2014 09:32:52

hary
Prüf das nochmal, es wird immer aktiviert ! ...

29.10.2014 10:37:33

Matthias
AW: Prüf das nochmal, es wird immer aktiviert ! ...

29.10.2014 12:49:08

hary
AW: danke an alle werde weiterhin probieren

29.10.2014 19:25:49

Achim
mein Ergebnis

30.10.2014 09:22:05

Achim

AW: keine Rueckmeldungen!?

29.10.2014 09:13:44

hary

Moin Achim
Viel von Rueckmeldungen haelst du nicht oder?
Wo liegt die Checkbox? Wann wird der Code ausgeloest?
In den anderen Threads ging es auch um Checkboxen.
gruss hary

AW: keine Rueckmeldungen!?

29.10.2014 09:18:15

Achim

Hallo Hary
Du hast recht.Sorry. Werde mich bessern. Nun die Rückmeldung.
Die Auslösung des Codes aus der UserForm2 mit dem CommandButton1.
Gruß Achim

AW: so

29.10.2014 09:32:52

hary

Moin

CheckBox1.Value = Sheets("SchülerGrundlagendaten").Range("G5").Value

gruss hary

Prüf das nochmal, es wird immer aktiviert ! ...

29.10.2014 10:37:33

Matthias

Hallo hary
Du wirst sicher schnell merken warum.
Gruß Matthias

AW: Prüf das nochmal, es wird immer aktiviert ! ...

29.10.2014 12:49:08

hary

Moin Matthias
<> ""
wurde gefressen. ;-)
gruss hary

AW: danke an alle werde weiterhin probieren

29.10.2014 19:25:49

Achim

danke an alle

mein Ergebnis

30.10.2014 09:22:05

Achim

Anbei meine Lösung nach langer suche und probieren.
Erläuterung: Wenn in dem Arbeitsblatt SchülerGrundlagen in der Zelle T22 aktiv eingetragen ist dann wird in der Checkbox18 ein Häckchen gesetzt.
Dim rng18 As Range
For Each rng18 In Sheets("SchülerGrundlagendaten").Range("T22")
If rng18.Value = "aktiv" Then CheckBox18 = True
Next rng18
Gruß Achim
Gruß Achim