Das Clever-Excel-Forum.de - Treffen
findet vom 15. - 17. September 2017 in Friedrichroda /
Thüringen / Region Großer Inselsberg statt. Hotelbuchung ab sofort möglich.

Checkbox per VBA aktivieren
#1
Hallo VBA - Freunde,

ich stehe wieder mal auf dem Schlauch und komme nicht weiter.

In den Zellen Z38:AG38 steht je nach früherer Auswahl in einem Userform ein X.

Wenn ich nun die Userform zum Ändern der früheren Eingaben aufrufe, möchte ich die entsprechende Ceckbox bei einem X mit schwarzem Häkchen (true) haben,

Mit folgendem Code geht es nicht:
Code:
Private Sub UserForm_Activate()

Dim sonst As String
Dim ExSi As String
Dim Exrgrue As String

sonst = Range("AH38").Value
ExSi = Range("Z38").Value
Exgrue = Range("AA38").Value


If ExSi = "X" Then
CheckBox1.Value = True
End If

'CheckBox1 = ExSi
CheckBox2 = Exgrue
Textbox1.Value = sonst
End Sub
Die Checkbox1 bleibt leer, die Ceckbox2 wird grau.

Wie müsste der Code richtig lauten?

Vielen Dank für eure Anrworten schon im voraus.
Es ist nicht genug, zu wissen. Man muss es auch anwenden.
Es ist nicht genug, zu wollen. Man muss es auch tun.
to top
#2
Hallo ihr,

mit:
If ExSi = "x" Then CheckBox1.Value = True Else CheckBox1.Value = False

ich hatte am Anfang nur auf ein großes X abgefragt, daran lag mein Fehler.

Danke
Es ist nicht genug, zu wissen. Man muss es auch anwenden.
Es ist nicht genug, zu wollen. Man muss es auch tun.
to top
#3
Moin,

erst einmal: Schön, dass du deine Lösung hier geschrieben hast. Der Komplettheit wegen:

Code:
If LCase(ExSi) = "x" Then CheckBox1.Value = True Else CheckBox1.Value = False

wäre noch besser (und richtiger) gewesen, denn in dem Fall wird "X" und "x" gleichermaßen akzeptiert.
Beste Grüße
  Günther

Excel-ist-sexy.de
  …schau doch mal rein!
Der Sicherheit meiner Daten wegen lade ich keine *.xlsm bzw. *.xlsb- Files mehr herunter! -> So geht's ohne!
to top


Möglicherweise verwandte Themen...
Thema Verfasser Antworten Ansichten Letzter Beitrag
  mehrere OptionsButton aktivieren VBA michel34497 10 305 18.02.2017, 18:54
Letzter Beitrag: michel34497
  Mit Checkbox nach Farben suchen VBA michel34497 2 98 18.02.2017, 18:44
Letzter Beitrag: michel34497
  Bedingte Formatierung durch Checkbox S2K 4 134 07.02.2017, 22:53
Letzter Beitrag: S2K
  Checkbox mit PW - Abbruch Code hinzufügen eitel91 25 382 02.02.2017, 18:13
Letzter Beitrag: atilla
  Checkbox Schriftgröße und Anordnung Jenny Ring 3 131 24.01.2017, 17:13
Letzter Beitrag: atilla
  Checkbox wert ausgeben hbboy15 14 527 10.01.2017, 22:22
Letzter Beitrag: hbboy15
  Checkbox zeilenabhänig vervielfältigen hbboy15 8 302 02.01.2017, 17:31
Letzter Beitrag: schauan
  Zeilen kopieren wenn Checkbox true tobi85 5 229 14.12.2016, 16:12
Letzter Beitrag: tobi85
Question CheckBox in freigegebener Arbeitsmappe vici 3 211 22.11.2016, 20:06
Letzter Beitrag: shift-del
  Checkbox "ja-Nein" derhanfti 6 279 18.11.2016, 11:00
Letzter Beitrag: derhanfti

Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 2 Gast/Gäste