Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
25.04.2024 12:55:42
Funktionsparameter auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
568to572
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
568to572
568to572
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Drucken bestimmte Seiten

Drucken bestimmte Seiten
17.02.2005 17:25:02
josch
Hallo,
wie ich den Drucken-Dialog ansteuern kann weiß ich.
Ich sollte allerdings das Ganze so mit VBA automatisieren, dass wenn eine bestimmte Zelle (bzw. in meiner Datei einen Namen in einer Zelle) markiert ist, auch nur eine bestimmte Seite gedruckt wird.
Will also das manuelle eingeben von... bis... Seite umgehen.
Weiß jemand Rat?

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Drucken bestimmte Seiten
17.02.2005 17:42:06
Thom@sCH
Hallo Josch
Schau dir mal das an:

Sub Drucken()
intFrom = InputBox("Druckbereich eingeben:" + Chr(13) + Chr(13) + "Seite von:", "Druckbereich")
intTo = InputBox("Druckbereich eingeben:" + Chr(13) + Chr(13) + "Seite bis:", "Druckbereich")
intCopies = InputBox("Druckbereich eingeben:" + Chr(13) + Chr(13) + "Anzahl Exemplare:    (mind. 1)", "NuPro - Nutzungsprogramm", "1")
ActiveSheet.PrintOut From:=intFrom, _
To:=intTo, Copies:=intCopies
End Sub

Gruss Thomas
AW: Drucken bestimmte Seiten
Reinhold
hallo Josch,
beim VBA- Druckbefehl .printout kannst du die zu druckenden Seiten angeben.
.PrintOut(From, To, Copies, Preview, ActivePrinter, PrintToFile, Collate, PrToFileName)
Grüße Reinhold
Anzeige
AW: Drucken bestimmte Seiten
18.02.2005 08:46:02
Josch
Danke! die Antwort von Thom@sCH hat mir geholfen.
Muss jetzt nur noch, da ich ja nicht unbedingt ne Seíte eingeben will sondern nen Namen, den eingegebenen Namen in Seiten umwandeln... Thanks
AW: Drucken bestimmte Seiten
18.02.2005 09:01:50
Thom@sCH
Hallo Josch
Sollte ja nicht ein grosses Problem sein:

Sub Drucken()
intFrom = Worksheets("Tabelle1").Range("A1").Value
intTo = Worksheets("Tabelle1").Range("A2").Value
intCopies = 1
ActiveSheet.PrintOut From:=intFrom, _
To:=intTo, Copies:=intCopies
End Sub

Gruss Thomas
AW: Drucken bestimmte Seiten
18.02.2005 10:24:00
Josch
so in der Art hab ich es gemacht. ist überhaupt kein Problem.
Jetzt sollte ich nur noch wissen, wie ich einen bestimmten Drucker, hier PDF-Drucker zum Druck festlegen kann.
Anzeige
AW: Drucken bestimmte Seiten
18.02.2005 10:32:02
Josch
Hat sich auch erledigt. Geht ja auch mit diesem Befehl!
Danke!

22 Forumthreads zu ähnlichen Themen

Nur bestimmten Bereich Drucken
Willy

Hallo Leute
Habe eine Tabelle A1-D60 mit Rahmen und Zwischenlinien, ab der 4. Zeile sind die Spalten miteinander verbunden.
Es soll nur der Bereich gedruckt werden, wo was drin steht, einzelne leer Zeilen sollen ignoriert (leer gedruckt) werden und am Ende sollen zwei leer Zeilen mit ge...
14.02.2009 12:21:00
Thread-ID: 1050686
4 Beiträge
Anzeige
nur bestimmtes TB und Bereich drucken
Gisela

Hallo,
ich habe ein Tabellenblatt in dem in einigen Zellen die weiteren TB-Namen vorhanden sind.
Es soll jeweils die TB gedruckt werden, deren Name in der jeweiligen Zelle steht.
Da ich nur begrenzte VBA-Kenntnisse habe, komme ich leider nicht weiter.
Hier mein bisheriges Ergebn...
04.10.2012 09:22:18
Thread-ID: 1280472
5 Beiträge
nur bestimmte Blaetter per VBA drucken
Andreas

Hallo,
ich habe eine Arbeitsmappe mit x Blaettern und manche von denen sind ausgeblendet.
Ich habe eine userform mit einer druckerauswahl. Nun moechte ich gerne die ausgeblendeten Blaetter mit CommandButton1 ausdrucken, aber nur wenn diese in Zelle "A4" Daten enthalten.
Kann mir vie...
11.08.2014 10:31:14
Thread-ID: 1375598
7 Beiträge
Anzeige
Nur bestimmte Zeilen drucken (individuell)
Pflaume

Liebe Excelperten ;)
in der Arbeit sitze ich gerade an einem neuen Unterweisungsformular, das jetzt soweit fertig ist und zusammen mit allen darin aufgeführten Unterweisungsthemen gedruckt werden kann. Jedes Thema steht in einer separaten Zelle. Jetzt ist es so, dass fast monatlich neue The...
27.10.2016 19:55:58
Thread-ID: 1521990
3 Beiträge
Bestimmte Seitenanzahl über Makro Drucken
Andi

Suche nach einer Möglichkeit, wenn über einen Button die zu druckenden Zeilen ermittelt wurden, das diese anhand der gezählten Zeilen auf die vier Druckmakros aufgeteilt werden.
Das Auszählen der Seiten funktioniert, das Drucken über die Makros ebenfalls. Allerdings muß ich dies noch händi...
20.12.2016 20:05:46
Thread-ID: 1531168
7 Beiträge
VBA Drucken mit variabler Seitenanzahl - Word
Hendrik

Hallo zusammen,
ich habe hier in diesem Forum einen passenden Code gefunden, für das automatische Drucken eines Dokuments. Leider komme ich nicht drauf, wie ich meine Variablen ("Seite" und "Kopien" richtig deklariere.
Der Code funktioniert einwandfrei ohne Variablen.
Sub Drucker...
11.07.2017 14:05:34
Thread-ID: 1568527
9 Beiträge
Nur die Hälfte aller Seiten drucken
Tobias Braumann

Hallo,wenn man in Excel einen Druckauftrag aus einem aktiven Blatt heraus startet, dann werden automatisch nur die Seiten gedruckt, die auch Inhalte haben (theoretisch ist das Arbeitsblatt ja unendlich groß). Ich suche nach einer Möglichkeit, in einer Routine die Anzahl dieser Blätter abzufrage...
07.09.2002 12:10:07
Thread-ID: 157489
3 Beiträge
nur bestimmte Tabellenblätter drucken
Felix

Hallo zusammen,
ich hoffe ihr könnt mir bei meinem Problem helfen, weil ich bin mit meinem Latein am Ende.
Folgende Problemstellung:
Ich habe eine Mappe mit 14 Tabellenblättern. Blatt 1 stellt eine Art Auswertungsblatt dar und die restlichen 13 Blätter sind mehr oder weniger identis...
31.05.2018 19:39:23
Thread-ID: 1626841
2 Beiträge
Anzeige

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
Archiv - Verwandte Themen
Forumthread
Beiträge
3
6
4
6
2
2
6
8
2
1
3
1
3
6
4
6
8
2
4
15
6
3