Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
960to964
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
960to964
960to964
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Klick eine Zelle hochzählen und drucken
13.03.2008 13:28:09
Marcel
Hallo,
ich suche eine Möglichkeit, mit Hilfe einer Schaltfläche
eine Zelle in der Tabelle um 1 erhöhen zulassen
und danach die Datei gleich auszudrucken.
Wir haben ein Formular, das bei jedem Druck eine
fortlaufende Nummer hat.
Die Nummer steht z.B. in F1 und ist am Anfang mit Wert 1 belegt.
Ich will nun eine Schaltfläche, auf die ich klicke
und mit jedem Klick kommt ein Formular aus dem Drucker
und in F1 erhöht sich die Zahl fortlaufend.
Da nicht feststeht, wieviel Formulare insgesamt benötigt werden,
muss die Datei mit der neuen Nummer in F1 gespeichert werden,
um später bei Bedarf mit der nächsten Nummer weiter zu drucken.
Vielen Dank für die Hilfe.
Marcel

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Klick eine Zelle hochzählen und drucken
13.03.2008 13:35:48
Rudi
Hallo,
Commandbutton einfügen, doppelklick drauf und diesen Code einfügen.

Private Sub CommandButton1_Click()
With ActiveSheet
.Range("F1") = .Range("F1") + 1
.PrintOut
End With
ActiveWorkbook.Save
End Sub


Die 'Printobjekt'-Eigenschaft des Cmd auf False stellen, damit er nicht mitgedruckt wird.
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

Anzeige

64 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige