|
Tabelle 1
| Checkbox (VBA Befehl 1) |
0 |
8 |
15 |
|
| Checkbox (VBA Befehl 2) |
47 |
11 |
|
|
| |
|
|
|
|
| |
|
|
|
|
| |
|
|
|
|
Tabelle 2
Also, wenn man von diesen beiden Tabellen ausgeht, so sieht die VBA 1 momentan so aus:
Private Sub CheckBox1_Click()
Sheets("Tabelle1").Range("B1:E1").Copy
Sheets("Tabelle2").Range("C4").PasteSpecial xlPasteValues
End Sub
Würde nun oberhalb der Zeile 1 eine Zeile eingefügt, so stehen die Daten `´0 8 15` danach in Zeile 2. Jedoch verweist die VBA 1 noch auf die Zeile 1, somit würde das anklicken der checkbox in der neuen zeile 2 dazu führen, dass die Daten aus Zeile 1 kopiert werden.
Da häufig neue Daten in die Liste aufgenommen werden, müsstenn dann jedes mal die VBAs neu programmiert werden, was zu viel Aufwand wäre.
Dieses würde ich gerne automatisieren, sodass die checkbox immer in der zugehörigen Zeile bleibt, d.h sie muss nach dem einfügen einer Zeile in die nächst untere Zeile "springen" und der mBereich muß angepasst werden, d.h. die Zeile hochgezählt (inkrementiert) werden
Tabelle 1 sollte dann so aussehen:
Tabelle 1
| Checkbox (VBA Befehl 3) |
1 |
2 |
3 |
4 |
|
| Checkbox (VBA Befehl 1) |
0 |
8 |
15 |
|
|
| Checkbox (VBA Befehl 2) |
47 |
11 |
|
|
|
| |
|
|
|
|
|
| |
|
|
|
|
|
| |
|
|
|
|
|
Ich hoffe ich habe mich erständlich ausgedrückt;)
|