ich benötige wieder einmal eure fachkundige Hilfe.
Ich habe ein Makro mit welchem ich einen Wert suche und dann den danebenstehenden Bereich lösche.
Dies erfolgt mit: Worksheets("Kontosalden").Range(Cells(i, 1), Cells(i, 6)).Delete Shift:=xlUp
Wenn ich jedoch die 2. Zeile von oben lösche, wird die Überschrift überschrieben.
Könnt ihr mir bitte mitteilen, wie ich den Code ändern muss, damit die Überschrift erhalten bleibt.
Besten Dank für eure Hilfe.
Gruss
Peter