COMatePlus Excel CheckBox

[Joe]

Moin,

vor meinem ersten Beitrag kurz zu mir: Mein Name ist Joe, komme aus Bremen und habe seit 4 Dekaden das Teenager Alter verlassen ...

Nun zu meine Frage: Ich suche eine Möglichkeit ein Kontrollkästchen in einer Excel Datei zu lesen und zu setzen.

Mit VB6 ging das so:

Code: Alles auswählen

Status = ExcelSheet.CheckBoxes("Check Box 163").Value
ExcelSheet.CheckBoxes("Check Box 163").Value = Status

Habe da bei COMatePlus nichts gefunden.

Danke, Joe

Nachtrag:
Mit Excel VBA kann man die CheckBox so lesen:

Code: Alles auswählen

MsgBox Worksheets(1).Shapes("Check Box 163").ControlFormat.Value

Checked liefert 1 und Unchecked -4146

-Joe

Nun kann ich auch gleich die Antwort geben:

Code: Alles auswählen

Status = ExcelObject\GetIntegerProperty("ActiveSheet\Shapes('Check Box 163')\ControlFormat\Value")

Danke Joe
Bitte