Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1168to1172
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
1168to1172
1168to1172
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

drucken nur bestimmte arbeitsblätter

drucken nur bestimmte arbeitsblätter
Wolfi
Hallo zusammen,
hab mal wieder ein Problem und keine Plan wie ich es mache....
zumindest weiß ich, wie es aussehen sollte :-)
Hier mein wirrer Gedankengang:
ich habe eine Arbeitsmappe mit vier Arbeitsblättern
das erste Blatt ist die "Datenaufnahme", danach folgen drei weitere mit verschiedenen Berechnungen.
In der Datenaufnahme wählt man aus, ob "gewünscht" oder eben "nicht gewünscht".
Jetzt möchte ich über Commandbutton, dass er nur die Blätter ausdruckt die gewünscht sind.
Die Checkbox variante hört sich interessant an, möchte ich aber gerne vermeiden.....
Bin um jeden Tipp dankbar......
Merci @ all
Wolfi

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: drucken nur bestimmte arbeitsblätter
22.07.2010 20:03:05
Hajo_Zi
HalloWolfi,
nur wenige sehen Deine Datei. Mache ein Kreuz in die Zelle.

AW: drucken nur bestimmte arbeitsblätter
23.07.2010 12:59:29
Philipp
Hi Wolfi,
das dürfte dir weiterhelfen
Private Sub CommandButton1_Click()
If Sheets("Datenaufnahme").Range("Zelle1") = "gewünscht" Then
Worksheets("TabelleX").PrintOut
Else: []
End If
If Sheets("Datenaufnahme").Range("Zelle2") = "gewünscht" Then
Worksheets("TabelleY").PrintOut
Else: []
End If
If Sheets("Datenaufnahme").Range("Zelle3") = "nicht gewünscht" Then
Worksheets("TabelleZ").PrintOut
Else: []
End If
End Sub

Anzeige
AW: drucken nur bestimmte arbeitsblätter
23.07.2010 13:05:57
Philipp
DA ist mir doch glatt ein feholer unterlaufen bei der 3. Schleife muss es natürlich "gewünscht" heißen
hier nochmal richtig
Private Sub CommandButton1_Click()
If Sheets("Datenaufnahme").Range("Zelle1") = "gewünscht" Then
Worksheets("TabelleX").PrintOut
Else: []
End If
If Sheets("Datenaufnahme").Range("Zelle2") = "gewünscht" Then
Worksheets("TabelleY").PrintOut
Else: []
End If
If Sheets("Datenaufnahme").Range("Zelle3") = "gewünscht" Then
Worksheets("TabelleZ").PrintOut
Else: []
End If
End Sub
Sonderregeln was passieren soll bei nciht geünscht kannst du jeweils in die "Else" Klammer einfügen
Viele Grüße
Phil
Anzeige

Links zu Excel-Dialogen

CheckBox CommandButton

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige