habe folgendes Makro als OnChange-Ereignis im Tabellenblatt.
Funktioniert auch prima.
Bei Änderung in einer Spalte wird entsprechend eine Berechnung in der gleichen Zeile in der Spalte daneben durchgeführt.
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim I As Long
If ActiveCell.Column = 1 And Target "" Then
Application.EnableEvents = False
For I = 2 To Cells(Rows.Count, 1).End(xlUp).Row
If Cells(I, 1).Value "" Then
Cells(I, 2).Value = Cells(I, 1).Value * 0.25
End If
Next I
Application.EnableEvents = True
End If
End Sub
Mein Problem ist nun, wenn ich eine zusätzliche (neue) Zeile einfüge, springt das Makro an und will debuggt werden. Wie kann ich dies verhindern?Danke im Voraus,
Gruß,
Ptonka