aximand
Goto Top

Checkbox Value -4146 ??

Moin zusammen.

Folgender Code:

  Set rng = Worksheets("Tabelle1").Range(Cells(lrow, 15), Cells(lrow, 15)) 
    Set cb = Worksheets("Tabelle1").CheckBoxes.Add(Left:=rng.Left, Top:=rng.Top, Width:=rng.Width, Height:=rng.Height) 
    cb.Name = lrow & "false" 
    cb.Caption = "" 
    cb.OnAction = "QSfalse" 
    cb.Value = False
    MsgBox cb.Value


Hier wird mir immer wieder -4146 ausgegeben, egal ob ich die Chebox mit Value = true oder false setze. Die Darstellung (angehakt/nicht angehakt) ist je nach Value richtig.
Woran mag das liegen??

Content-Key: 381137

Url: https://administrator.de/contentid/381137

Printed on: May 23, 2024 at 11:05 o'clock

Member: SachsenHessi
SachsenHessi Jul 24, 2018 at 07:51:50 (UTC)
Goto Top
Hallo,
versuche es mal mit den Excel-Konstanten.
Bsp:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("A2").Value = "Test" Then  
        ActiveSheet.CheckBoxes("Check Box 1").Value = xlOn  
    Else
        ActiveSheet.CheckBoxes("Check Box 1").Value = xlOff  
    End If
End Sub
LG
Frank
Member: SeaStorm
Solution SeaStorm Jul 24, 2018 at 08:21:37 (UTC)
Goto Top
Willkommen in Excel face-sad
Wert 1 ist Checked, 2 ist Mixed(grau), -4146 ist Unchecked

Besser sind die von @SachsenHessi erwähnten Konstanten xlOn und xlOff
Member: Aximand
Aximand Jul 24, 2018 at 08:55:28 (UTC)
Goto Top
Ja geil, Danke für die iNfo mit dem Unchecked -4146.
Hatte ich auch schon nach gesucht aber nix passendes gefunden, darum hier gefragt face-smile

Warum das bei mir egal ob checked oder unchecked auf -4146 steht möchte ich natürlich auch erwähnen.

Ich bin gerade in der Testphase und bei jedem Klick auf den Button StartTest wird im Prinzip das gemacht, was später beim Aufrufen des Sheets auch erfolgen soll. Dummerweise habe ich vergessen, dass die bereits bestehenden Checkboxen natürlich auch entfernt werden müssen. So gab es ca. 100 Checkboxen mit zum Teil identischen Namen.... Dann kann das nich fun###ieren face-smile

Danke für die Info und Hilfe!
Member: SachsenHessi
SachsenHessi Jul 24, 2018 at 09:33:51 (UTC)
Goto Top
Noch ein Tipp..
im VB-Editor kann man sich mit Taste [F2] den Objektbrowser anzeigen lassen.
Dort kann man sich unter <Global> alle Konstanten (beginnen mit xl...) und auch sonstige Objekte (mit ihren Parametern) anzeigen lassen.
y2018-07-24_113201

LG
Frank