Guten Abend,
ich habe folgendes Problem schon seit 4 Tagen, komme nicht
weiter.
Ich habe eine Datenbank mit 500 Einträgen, diese haben über VBA-
Code in Spalte A ein Kontrollkästchen bekommen. Nun möchte ich
bei Auswahl des Kästchens, dass sich die Zeile ins nächste
Tabellenblatt kopiert. Mein Code sieht folgend aus:
Option Explicit
Sub Kontrollkästchen_einfügen()
Dim Wiederholungen As Integer, Position As Double
Application.ScreenUpdating = False
Position = 0
For Wiederholungen = 1 To 500
With ActiveSheet.CheckBoxes.Add(15, Position, 24, 15)
.LinkedCell = "$A$" & Wiederholungen
.Characters.Text = ""
End With
Position = Position + 15
Next
End Sub
Wie kann ich das machen, ohne jedes einzeln ansprechen zu
müssen?
Bitte helft mir!
Grüße Nicole