Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
836to840
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
836to840
836to840
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Beim Drucken aufzählen der DokumentenNr.

Beim Drucken aufzählen der DokumentenNr.
18.01.2007 22:01:37
Schäfer
Hallo,
wer kann mir helfen !!!
nach der Umstellung auf EXEL 2003
ist das Makro verloren gegangen.
Wir benötigen hilfe bei der Anforderung,
das in einer Zelle die eingegebene Zahl
beim Drucken immer um eins erhöht wird.
wenn wir also mit eins anfangen und 50 Seiten
Drucken hat zweite seite die Nr 2,
die dritte Seite die Nr 3
und die letzte gedruckte Seite dann
die Nummer 50.
grüsse aus Koblenz

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Keiner mehr da der uns helfen kann ?
18.01.2007 22:42:57
Schäfer
Hallo,
ist denn keiner mehr da, der uns helfen kann.
AW: Keiner mehr da der uns helfen kann ?
18.01.2007 22:58:45
Wetterfrosch
Hi,
hast du nicht mitbekommen, dass in D Orkan angesagt ist?
Ich hate z.B. 4 Stunden keinen Strom.
mfg W.
Hilfe !!!
18.01.2007 23:31:20
Schäfer
Hilfe !!!
AW: Beim Drucken aufzählen der DokumentenNr.
18.01.2007 23:35:50
Josef
Hallo Schäfer,
welche Zelle, welches Tabellenblatt, wo wird die Seitenanzahl angegeben?
Gruß Sepp

Beim Drucken aufzählen der DokumentenNr.
18.01.2007 23:41:02
Schäfer
Hallo Sepp,
der wert steht in der Zelle "F2"
im Blatt "Tabelle1"
es soll der Wert in der Zelle F2 immer um eins erhöht werden.
gruss
Bruno
AW: Beim Drucken aufzählen der DokumentenNr.
18.01.2007 23:48:37
Josef
Hallo Bruno,
meinst du so?
Sub Drucken()
    Dim intCounter As Integer, intCopies As Integer
    
    intCopies = Application.InputBox("Wieviele?", "Drucken", 1, Type:=1)
    
    If intCopies < 1 Then Exit Sub
    
    With Sheets("Tabelle1")
        
        For intCounter = 1 To intCopies
            .PrintOut
            .Range("F2").Value = Range("F2").Value + 1
        Next
        
    End With
    
End Sub

Gruß Sepp
Anzeige
AW: Beim Drucken aufzählen der DokumentenNr.
18.01.2007 23:56:29
Schäfer
SUPER !!!
genau so haben wir uns das gedacht !!!
vielen Dank Sepp !!!
viele grüße aus Koblenz
DANKE !!!!!!!!!!!!
18.01.2007 23:59:29
Schäfer
DANKE !!!!!!!!!

Links zu Excel-Dialogen

InputBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige