Zellen löschen / VBA
Lutz
mit dem nachstehenden Code bilde ich auf Befehl des Users eine Summe die dann immer 2 Zeilen unter dem letzten mittels UserForm eingegebenen Datensatz erzeugt wird.
Nun habe ich das Problem das wenn ich einen neuen Datensatz eingebe der diesen immer unter die vorher erzeugt Summe schreibt. Daher möchte ich das wenn der neue Datensatz mit dem "Anlegen" Button angelegt wird vor dem Schreiben des Datensatzes diese Summe gelöscht wird.
Vielen Dank schonmal für Eure Mühe und ein wunderschönes Wochenende.
Sub Addieren()
Dim iRow As Double
iRow = Cells(Rows.Count, 12).End(xlUp).Row + 2
Cells(iRow, 2).Value = "Gesamt:"
Cells(iRow, 4).FormulaLocal = "=SUMMEWENN($C:$C;""Dezember"";$D:$D)"
End Sub