Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

laufende Dokumentennr.

Forumthread: laufende Dokumentennr.

laufende Dokumentennr.
28.08.2006 10:54:59
Emma
Hallo,
kann mir jemand sagen, wie man eine laufende Dokumententennummer einfügen kann, die sich bei jedem drucken der Seite um 1 erhöht?
Vielen Dank
Emma
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: laufende Dokumentennr.
28.08.2006 11:26:59
egres
Hi Emma
schau mal in https://www.herber.de/bbs/user/36207.xls nach!
vielleicht hilf dir das weiter!
Baue ein Buton fürs Drucken ein und passe eines der Makro ein.
Gruss Egres
AW: laufende Dokumentennr.
28.08.2006 11:44:56
emma
Dankeschön,
ich versuch mich mal dran.
emma
Anzeige
AW: laufende Dokumentennr.
Orakel
Hallo Emma,
ich denke, Du musst für die entsprechende Tabelle einen Extra-Druckbutton machen. Dieser Code ginge dann:
Sub drucken()
    Sheets("Tabelle1").PrintOut Copies:=1, Collate:=True
    Call Nummer
End Sub
Sub Nummer()
    Dim RN As Integer
    RN = Sheets("Tabelle1").Cells(1, 1)
    Sheets("Tabelle1").Cells(1, 1) = RN
    RN = RN + 1
    Sheets("Tabelle1").Cells(1, 1) = RN
End Sub
wenn Du das Druckereignis in "Diese Arbeitsmappe" nutzt
Private Sub Workbook_BeforePrint(Cancel As Boolean)
End Sub
zählt er jeden Druckauftrag.
Grüße
Orakel
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige