Makro ab bestimmter Zelle beginnen lassen
29.12.2003 15:21:32
maze
ich habe dieses Makro bekommen und er soll mit der Zeile B4 anfangen und nicht auf B1. Wo muß ich die Änderung vornehmen???
Gruß
Maze
Option Explicit
Sub Create_Checkboxes()
Dim i As Integer
For i = 1 To 4 'Zahl bitte anpassen
ActiveSheet.CheckBoxes.Add(Cells(i, 2).Left, Cells(i, 2).Top, 75, 8).Select
With Selection
.Caption = "Checkbox " & i
.Value = xlOff
.LinkedCell = "$A$" & i
End With
Next i
End Sub
Anzeige