04.04.2023, 12:45
Hallo.
als Vorschlag
Sheets("Erfassung").Range("B19").Value = intJahr & "_" & Format(intLfdnr + 1, "000")
als Vorschlag
Sheets("Erfassung").Range("B19").Value = intJahr & "_" & Format(intLfdnr + 1, "000")
Gruß der AlteDresdner (Win11, Off2021)