Hallo,
ich möchte eine variable Anzahl an Checkboxes erzeugen und sie danach auch noch richtig positionieren.
Bei folgendem Code habe ich das Problem, dass alle Checkboxes die gleiche Caption haben:
For i = 1 To engctr
Dim PosiX As Single, PosiY As Single
' XY-Werte der Zellpositionen festlegen
PosiX = Cells(i + 25, 3).Left
PosiY = Cells(i + 25, 3).Top
With ActiveSheet.CheckBoxes
.Add(PosiX, PosiY, 72, 17.25).Select
.Caption = "Engine" & i
End With
Next
ich weiß, dass das an der Eigenschaft CheckBoxes hängt, aber ich habe keine Ahnung wie ich das anders schreiben kann. Die Caption sollte quasi "Engine1, Engine2, Engine3,...." sein.
Zweitranginges Problem:
Wie positioniere ich die Checkboxes zentral in den jeweiligen Zellen? Jetzt sind sie ja immer linksbündig. Leider hift mir die Excel-Hilfe nicht weiter bzw. ich bin zu doof, sie zu verstehen.
Danke im Voraus