Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema CheckBox
BildScreenshot zu CheckBox CheckBox-Seite mit Beispielarbeitsmappe aufrufen

CheckBox in Zahl umwandeln

Betrifft: CheckBox in Zahl umwandeln von: Heinz H
Geschrieben am: 23.11.2014 08:43:09

Schönen Sonntag morgen

Über eine UF trage ich Werte ein.
Funktioniert auch,NUR sollte bei CheckBox2 statt "Wahr" eine "1" stehen,
bei "FALSCH" sollte "" eingetragen werden.

Private Sub CheckBox2_Click()
CheckBox2.Visible = IIf(CheckBox2.Value = "WAHR", 0, 1)
End Sub

Ws.Cells(StartZeile, 27) = Me.CheckBox2
Könnte mir dazu bitte jemand weiterhelfen?

Gruß Heinz

  

Betrifft: versuch mal mit * 1 dahinter oT. von: Tino
Geschrieben am: 23.11.2014 08:48:29




  

Betrifft: AW: versuch mal mit * 1 dahinter oT. von: Heinz H
Geschrieben am: 23.11.2014 08:51:51

Hallo Tino

Wenn du so meintest,funkt.es leider nicht.

Private Sub CheckBox2_Click()
CheckBox2.Visible = IIf(CheckBox2.Value = "WAHR", 0, 1) * 1
End Sub
Danke,Heinz


  

Betrifft: AW: versuch mal mit * 1 dahinter oT. von: Crazy Tom
Geschrieben am: 23.11.2014 09:11:26

Hallo Heinz

was passiert denn wenn du "WAHR" gegen True tauschst?

MfG Tom


  

Betrifft: sorry, geht mit * 1 nicht ... von: Tino
Geschrieben am: 23.11.2014 09:18:04

Hallo,
versuch es mal so.

Ws.Cells(StartZeile, 27) = IIf(Me.CheckBox2.Value, 1, "")
Gruß Tino


  

Betrifft: AW: sorry, geht mit * 1 nicht ... von: Heinz H
Geschrieben am: 23.11.2014 09:26:13

Hallo Tino & Crazy Tom

Der Tip mit Ws.Cells(StartZeile, 27) = IIf(Me.CheckBox2.Value, 1, "")
war Goldrichtig

Recht herzlichen Dank,euch beiden.

Schönen Sonntag,wünscht Heinz


 

Beiträge aus den Excel-Beispielen zum Thema "CheckBox in Zahl umwandeln"