Live-Forum - Die aktuellen Beiträge
Datum
Titel
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
25.04.2024 11:49:37
Array verwenden
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
916to920
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
916to920
916to920
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Nur bestimmte Blätter drucken

Nur bestimmte Blätter drucken
18.10.2007 13:45:00
Edwin
Hallo
hatte mein Problem schon mal angefragt, weiß nicht ob das überhaupt zu lösen ist.
In meiner Arbeitsmappe sind 25 Tabellenblätter wo jeden Tag unterschiedlich viele (mal3 mal5 mal10 usw.)ausgefüllt werden. Nun möchte ich über eine Userform (oder ähnlichem) auf meinem Deckblatt automatisch (vielleicht über eine ausgefüllte Zelle ) angezeigt bekommen welche Blätter ausgefüllt sind und nur diese ausgefüllten Blätter dann drucken.
Danke im voraus
Gruß Ede

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

Betreff
Datum
Anwender
Anzeige
AW: Nur bestimmte Blätter drucken
18.10.2007 14:51:00
fcs
Hallo Ede,
im prinzip kein Problem.
Erstelle auf dem Deckblatt in einer Spalte eine Liste aller Tabellennamen
In der Spalte daneben dann mit einer Bedingung einen Wert eintragen der zum Drücken abgefragt wird.
Beispiel:

=WENN(ISTFEHLER(INDIREKT("'" & A5 & "'!B2"));"";WENN(INDIREKT("'" & A5 & "'!B2")"";"ausgefüllt";"") )


In A5 steht ein Tabellenblattname, B2 ist die Zelle im Tabellenblatt, die kennzeichnet, dass das Blatt ausgefüllt ist.
Ich müsstte nur wissen, ob die Blätter jeweils einzel gedruckt werden sollen oder gruppiert. Dann kann ich auch die entsprechende Druckroutine programmieren.
Gruß
Franz

Anzeige
AW: Nur bestimmte Blätter drucken
18.10.2007 17:20:58
Edwin
Hallo Franz,
super, danke für die schnelle Antwort.
Die Blätter sollen gruppiert werden aber nicht gedruckt sondern als pdf (hab da das FreePDf inst.) gespeichert werden. Dürfte aber wohl keine Rolle spielen. Wäre ja super wenn du mir das programmieren könntest.
Gruß Ede

AW: Nur bestimmte Blätter drucken
19.10.2007 14:08:00
fcs
Hallo Ede,
hier das Makro um die ausgefüllten Blätter gruppiert zu drucken, anzupassende Zeilen sind markiert.
Gruß
Franz

Sub AuswahlDrucken()
'Druckt mehrere Blätter entsprechend Kriterium
Dim arrBlatt() As String, Kriterium As String, DruckerAktiv As String
Dim iI As Integer, iZeile As Integer, Bereich As Range
'Bereich mit Blattnamen und Kriterium (Linke Spalte Name, recht Kriterium)
Set Bereich = Worksheets("Deckblatt").Range("A5:B30") '###Zeile ggf. anpassen
Kriterium = "ausgefüllt"
'zu druckende Blätter in Feld einlesen
iI = 1
ReDim arrBlatt(1 To iI)
For iZeile = 1 To Bereich.Rows.Count
If Bereich(iZeile, 2) = Kriterium Then
ReDim Preserve arrBlatt(1 To iI)
arrBlatt(iI) = Bereich(iZeile, 1)
iI = iI + 1
End If
Next
If arrBlatt(1)  "" Then
'Aktiven Drucker merken
DruckerAktiv = Application.ActivePrinter
'PDF-Drucker wählen
Application.ActivePrinter = "Adobe PDF auf Ne01:" '###Zeile ggf. anpassen
ActiveWorkbook.Sheets(arrBlatt).PrintOut
'Drucker zurücksetzen
Application.ActivePrinter = DruckerAktiv
Else
MsgBox "Keine Blätter für Druck gewählt!"
End If
End Sub


Anzeige
AW: Nur bestimmte Blätter drucken
19.10.2007 19:39:22
Edwin
Hallo Franz,
ja super, hab es etwas abgeändert. Ich wäre ohne deine Hilfe nie so weit gekommen.
Danke Danke
Gruß Ede

302 Forumthreads zu ähnlichen Themen

Spalte nicht ausdrucken
Edwin

Hallo,
ich möchte in einem Sheet, dass eine bestimmte Spalte nicht ausgedruckt wird.
Ich weiß, dass ich Spalten ausblenden kann und dass diese dann nicht ausgedruckt werden.
Kann ich aber auch der Spalte die Eigenschaft zuweisen, dass sie nicht ausgedruckt wird?
Gruß
Edwin
05.11.2008 10:42:43
Thread-ID: 1021789
4 Beiträge
Anzeige
Combobox ausgeblendete Zeilen nicht anzeigen
helena

Schönen Guten Morgen
Kleines Problem ich verstecke Zeilen wenn in Spalte C Begriff nicht vorhanden dies klappt auch
aber via Combobox suche ich Namen (Adressvergabe) aber es werden mir immer alle aufgelistet auch wenn Zeilen ausgeblendet sind, ich Blende aus ob ich nur G_kunden oder P_...
28.12.2008 09:10:32
Thread-ID: 1035521
12 Beiträge
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
Zeilen nicht drucken, wenn Spalte leer oder 0
Berlenbach

Hallo,
ich habe ein Problem mit dem unten angegebenen und hier veröffentlichten Makro:
Sub Drucken() Dim iRowL As Integer, iRow As Integer iRowL = Cells(Rows.Count, 3).End(xlUp).Row For iRow = 1 To iRowL If IsEmpty(Cells(iRow, 3)) Or Cells(iRow, 3).Value = 0 Then Rows(iRow).Hidden = T...
01.04.2009 09:37:06
Thread-ID: 1065835
8 Beiträge
einzelne Zellen nicht schützen, wie?
dietmar

Hallo,
ich möchte bei einem EXCEL-Formular, dass man nur einzelne Zellen befüllen kann und der Rest des Formulars gesperrt ist. Die auszufüllenden Zellen (z.B. Name, Adresse, usw.) sollten durch Tab angewählt werden können. Zur Zeit kann ich nur einzelne Zellen sperren aber nicht umgekehrt?...
05.04.2009 22:41:32
Thread-ID: 1066974
6 Beiträge
Drucken nicht zusammenhängender Bereiche
reiner

Hallo Leute,
ich will auf der Vorderseite eines Blattes die mit "Bereich 1" und "Bereich 2" bezeichneten Zellbereiche drucken.
Auf der Blattrückseite soll "Bereich 3" sowie "Bereich 4" von Tabelle2 untereinander gedruckt werden.
Ist es überhaupt möglich Tabellenblatt-übergreifend D...
10.06.2009 14:24:46
Thread-ID: 1080504
3 Beiträge
2D - Array aber nur bestimmte Spalten einlesen
Axel

Hallo,
ich möchte ein Datenblatt einlesen. Dieses besteht aus 1800 Zeilen und 9 Spalten.
Diese lesen ich in einen Variant ein. Dim Daten As Variant Daten = Worksheets("Tabelle1").Range("A3:I1874")
allerdings brauche ich die Spalte H nicht. Meiner Meinung nach habe ich jetzt zwei Mö...
04.09.2009 11:44:00
Thread-ID: 1100595
9 Beiträge
Combobox soll nur bestimmte Zeilen zeigen
Jörg-HH

Guten Abend zusammen
habe in einem Thread mit Franz neulich viel über Listboxen gelernt und wollte das nun auf ein ähnliches Problem mit einer Combobox übertragen - aber da hapert es noch etwas ;-)) Ich hab versucht, einiges von dem Code, den Franz mir gesendet hat, zu verwenden
In dies...
23.09.2009 20:23:50
Thread-ID: 1105056
30 Beiträge
Anzeige

Links zu Excel-Dialogen

UserForm

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
22
11
3
6
7
5
2
8
29
1
7
8
7
2
1
4
1
2
4
1
9
3
2
4