ich möchte auf einer rechnung eine fortlaufende nummer per makro einfügen, was bis jetzt auch schon klappt.
ABER : wie kann diese nummer automatisch NACH dem ausddruck erhöht werden ?
bin für jede hilfe echt dankbar
M.Schulz
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheets("Tabelle1").Range("a1") = Sheets("Tabelle1").Range("a1") + 1
End Sub
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.Cells(1, 1).Value = ActiveSheet.Cells(1, 1).Value + 1
End Sub
Private Sub Workbook_BeforePrint(Cancel As Boolean)
cells(1,26)=cells(1,26)+1
End Sub