Hallo Forum,
ich hab folgenden Code:
With Worksheets("ALL-REST")
For Each Zelle In .Range(.Cells(3, 4), .Cells(Rows.Count, 4).End(xlUp))
Set oShape = .Shapes.AddFormControl(xlCheckBox, 0, 0, 0, 0)
With oShape
.Left = Zelle.Left + 0
.Top = Zelle.Top - 3
.Width = 10
.Height = 10
.TextFrame.Characters.Text = ""
ich würde gerne in der Spalte AG mir einen Werte anzeigen lassen abhängig davon ob in der CheckBox ein Häckchen ist oder nicht, sprich zB ein WAHR oder FALSCH. Weiß jemand wie ich den Code diesbezüglich anpassen muss?
Gruß
Michael
|