Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
376to380
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
376to380
376to380
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Blatt drucken ja/nein wieviel Copien

Blatt drucken ja/nein wieviel Copien
08.02.2004 14:11:25
Harry
Hallo Forum , ich brauche mal eure Hilfe.
Bin in in Excel und VBA noch sehr Unerfahren , habe in einer Tab. "Blatt1"
den Bereich A1 - Z40 möchte ich Ausdrucken ist auch kein Problem.
Nun möchte ich aber das vor Beginn des Druckens eine Abfrage die Beinhalten sollte "soll gedruckt werden " und das die Anzahl der Copien bestimmt werden
kann.
Kann mir jemand bei dem VBA Code behilflich sein ?
Gruss Harry

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blatt drucken ja/nein wieviel Copien
08.02.2004 14:21:22
geri
Hallo HArry
Option Explicit

Sub druck_anzahl()
Dim dAnz As Variant
dAnz = Application.InputBox("Wieviele Ausdrucke?", "Eingabe", Default:=1, Type:=1)
If dAnz <> False Then
dAnz = Fix(dAnz)
If dAnz > 0 Then ActiveWindow.SelectedSheets.PrintOut Copies:=dAnz, Collate:=True
End If
End Sub

aus Forum
gruss geri
AW: Blatt drucken ja/nein wieviel Copien
08.02.2004 14:28:21
Harry
Hallo Geri , Danke für deine Antwort, kann ich nun das was ich mit dem Markrorecorder
aufgezeichnet habe da auch einbauen damit nur der Bereich A1:Z40 gedruckt wird.
Gruss Harry
AW: Blatt drucken ja/nein wieviel Copien
08.02.2004 14:35:23
geri
Hallo Harry
geh doch auf DATEI/SEITE EINRICHTEN/Tabelle DRUCKBEREICH
wenn es immer gleich ist kannst du es dort einstellen ohne Makro
gruss geri
Anzeige
AW: Danke Geri
08.02.2004 14:38:10
Harry
Ja Geri , Du hast recht bin nur nicht drauf gekommen,vielen Dank.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige