Zellbezug mit CheckBox
18.06.2015 16:31:32
Michael
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 + 1
.Top = Zelle.Top + 1
.Width = 10
.Height = 10
ich würde gerne in einer weiteren Zelle, wahlweise in der Spalte AG, mir beim setzen eines Häckchens in der CheckBox einen Wert anzeigen lassen. Das kann WAHR sein, ansonsten halt FALSCH. Wie müsste ich die Formel anpassen um das zu realisieren. Wäre dankbar für jede Hilfe.
Gruß
Michael
Anzeige