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

Hochzählen beim Ausdrucken

Forumthread: Hochzählen beim Ausdrucken

Hochzählen beim Ausdrucken
Michael
Hallo,
ich möchte in einem Excel Arbeitsblatt beim Asdruck eine laufende Nr. Drucken.
Wer kann mir helfen ?
Gruß Michael
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Hochzählen beim Ausdrucken
PeterW
Hallo Michael,
klick mal links auf Excel-Recherche und gib als Suchbegriff "laufende Nummer" ein.
Gruß
Peter
AW: Hochzählen beim Ausdrucken
geri
Hallo Michael
meinst du so, dies nummeriert die Kopien
d.h. 1 Kopie hat Nummer 1, 2. Kopie 2, ....

Sub print_new()
Dim AnzahlDruck As Integer, i As Integer
Cells(2, 9) = 0 'Null schreiben in Zelle "I2"
On Error GoTo errorhandler
AnzahlDruck = InputBox("Bitte Anzahl eingeben:", Default:=4)
For i = 1 To AnzahlDruck
Range("i2") = i
ActiveWindow.SelectedSheets.PrintOut Copies:=1
Next i
errorhandler:
End Sub

es schriebt IN ZELLE I2 (anpassen)
gruss geri
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige