Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1156to1160
1156to1160
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ausdrucken mit Makro - Blätter nach Wert

Forumthread: Ausdrucken mit Makro - Blätter nach Wert

Ausdrucken mit Makro - Blätter nach Wert
jens
Hallo Excel Profis,
ich habe ein Programm mit dem ich Ausdrucke erzeigen möchte.
Wenn in der Zelle "Tabelle1" D50 eine 1 steht, soll nur das Blatt B-1 ausgedruckt werden.
Bei einer 2 soll Blatt B-1 und B-2 ausgedruckt werden
Bei einer 3 soll Blatt B-1 und B-2 und B-3 ausgedruckt werden...
Das ganze geht bis zu 20.
Wie kann man das machen?
Muß man eine schleife nehmen oder besser case if?
Ist wahrscheinlich ganz einfach aber mir fehlt der Start schon.
Vielen Dank für Eure Hilfe
Gruß Jens
Anzeige
AW: Ausdrucken mit Makro - Blätter nach Wert
20.05.2010 12:25:07
Rudi
Hallo,
einfach Schleife
for i= 1 to Sheets("Tabelle1").Range("D50")
sheets("B-" & i).PrintOut
Next
Gruß
Rudi
AW: Ausdrucken mit Makro - Blätter nach Wert
20.05.2010 12:36:20
jens
Hallo Rudi,
das ist ja ultrakurz und funktioniert super!
Ich habe allerding doch noch etwas vergessen:
In den B-&i Blättern steht in Zelle B3 noch die Anzahl der zu druckenden Blätter (von diesem Blatt) - bekommt man das auch noch hin?
Vielen Dank schon mal für Deine Hilfe
Viele Grüße Jens
Anzeige
AW: Ausdrucken mit Makro - Blätter nach Wert
20.05.2010 12:46:26
Rudi
Hallo,
sheets("B-" & i).PrintOut copies:=sheets("B-" &i).Range("B3")
Gruß
Rudi
AW: Ausdrucken mit Makro - Blätter nach Wert
20.05.2010 12:50:30
jens
Hallo Rudi,
wahnsinn - in einer Zeile.
Ich bewundere das wirklich.
Vielen vielen Dank und noch einen schönen Tag wünsche ich Dir
Viele Grüße Jens
AW: Ausdrucken mit Makro - Blätter nach Wert
20.05.2010 12:26:43
welga
Hallo,
versuch es mal so: (ungetestet)
Sub druck()
Dim i As Long
If IsNumeric(Sheets("Tabelle1").Cells(50, 4)) And Sheets("Tabelle1").Cells(50, 4)  ""  _
Then
For i = 1 To Sheets("Tabelle1").Cells(50, 4).Value
Sheets("Blatt B-" & i).Print
Next i
Else
MsgBox "Bitte Anzahl Blätter angeben"
End If
End Sub
Gruß
welga
Anzeige
AW: Ausdrucken mit Makro - Blätter nach Wert
20.05.2010 12:38:08
jens
Hallo Welga,
Vielen Dank, das funktioniert super! Ich habe die Version von Rudi genommen, die geht ohne Nachfrage und der Code ist ja untralurz.
Ich habe allerdings doch noch etwas vergessen:
In den B-&i Blättern steht in Zelle B3 noch die Anzahl der zu druckenden Blätter (von diesem Blatt) - bekommt man das auch noch hin?
Vielen Dank schon mal für Deine Hilfe
P.S. die Frage habe ich auch an Rudi gestellt, ihr wart je eben beide superschnell
Viele Grüße Jens
Anzeige
;

Forumthreads zu verwandten Themen

Einzelne Zeilen markiert ausdrucken
Urmila

Hallo gemeinsam,
ich habe eine Liste mit verschidenen Personen, soetwas wie eine Verteilerliste.
Da die Liste umfangreich ist und ich nicht immer wieder die einzelne Person markieren muss und ausdrucken muss, gibts da sicherlich was dazu....
Fall:
In den Spalten A bis E stehen I...
22.09.2008 10:01:00
Thread-ID: 1011388
3 Beiträge
Anzeige
fixierte Zeile beim Ausdrucken anzeigen
skuehmichel

Hallo.
Ich habe eine Tabelle in der ich eine Zeile fixiert habe so das ich beim scrollen immer den Überblick hab welche beschriftung diese spalte nun hat. Beim Ausdrucken bekomme ich diese Zeile allerdings nur einmal angezeigt und zwar als erstes. möchte aber das sie auf jedem neuen Blatt o...
30.09.2008 16:43:00
Thread-ID: 1013448
2 Beiträge
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
Outlook 2007-erste Seite ausdrucken
Susanne

Hallo zusammen,
ich weiß, dass ich die Frage nicht hier stellen sollte, da es sich lediglich um Outlook und nicht Excel Fragen handelt. Nun ich habe schon überall im Google auf die Lösungen gesucht und alle sind verzweifeln! Da ihr aber VBA Profi seid, versuche ich mal die Frage Euch zu ste...
16.11.2008 15:30:36
Thread-ID: 1024918
2 Beiträge
bestimmte PDF-Seite ausdrucken
sepp

Hallo
habe aus dem Forum ein Programm zum Ausdrucken
von Pdf Dateien:
Public Product
Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hWnd As Long, ByVal lpOperation As String, _ ByVal lpFile As String, ByVal lpParameters As String, _ ByVal...
18.11.2008 20:15:18
Thread-ID: 1025777
3 Beiträge
Tabelle auf DIN A 4 ausdrucken
Kathryn

Hallo,
ich habe eine Excel Tabelle, die ich nun ausdrucken möchte. Leider passt die Tabelle beim ausdrucken nicht auf ein DIN A 4 Blatt. Kann ich das irgendwie konfigurieren oder muss ich die Schrift noch kleiner machen?
Gruß.
01.12.2008 17:06:00
Thread-ID: 1029307
3 Beiträge
Anzeige
Mit Excel Macro Powerpoint Datei ausdrucken.
DirkR

Hallo zusammen,
ich habe ein Problem mit einem Makro und bin leider bei der Recherche nicht fündig geworden:
Über ein VBA Makro in Excel möchte ich gerne eine Powerpointdatei welche bereits geöffnet ist ausdrucken,
und zwar achtmal auf einem bestimmten Drucker.
Habt Ihr einen Ti...
22.12.2008 16:34:48
Thread-ID: 1034802
2 Beiträge
Clipboardinhalt ausdrucken
gröbi

Hallo,
ich möchte den Inhalt einer Listbox mit PDF-Creator ausdrucken. Der Inhalt der Listbox ist größer als die Maße der Listbox, weshalb der Ausdruck des Formulares nicht in Erwägung kommt. Ich habe den Inhalt in eine Texdatei (.txt) transportiert. Doch dort kann eine Schriftart vorgegebe...
15.02.2009 14:33:00
Thread-ID: 1050877
3 Beiträge
Website per makro ausdrucken
meixner

Hallo zusammen,
möchte per makro aus dem Excel eine Website automatisch ausdrucken?
Pfad der Datei ist:
http://www.stoxx.com/download/data/change_files/corporate_actions_tmi_components.txt
Kann mir jemand mit dem Makro helfen? Habe noch keine Idee.
Vielen Dank
Dani
27.04.2009 15:17:24
Thread-ID: 1071397
2 Beiträge
Zähler für Ausdrucke
Ralf

Hallo Zusammen,
ich habe da wieder mal ein Problem.
Ich habe eine Datei in der Aufträge erfasst werden. Ein Eingabeblatt mit einer Zeile pro Auftrag und 3 Ausgabeblätter in denen die Daten per Sverweis unter Angabe der Auftragsnummer übertragen werden. Ich möchte jetzt einen Zähler pro...
20.05.2009 14:42:54
Thread-ID: 1076382
16 Beiträge
Anzeige
Chart Filter mit dem Chart ausdrucken
Markus

Hallo zusammen,
Ich hoffe irgendwer kann mir weiterhelfen. Ich habe ein Pivot Chart und möchte dieses ausdrucken.
Soweit so gut, allerdings wie bekomme ich die eingestellten Filter mit auf den Ausdruck?
Wenn ich die Charts jetzt drucke, habe ich keine Ahnung mehr was im Filter einge...
11.09.2009 11:36:27
Thread-ID: 1101812
4 Beiträge
WebBrowser -> ausdrucken
Holger

Hallo zusammen,
wie kann ich den Inhalt des WebBrowser ausdrucken. Möchte das Programmiertechnisch anstossen.
Gruss
Holger
11.09.2009 14:20:33
Thread-ID: 1102027
10 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige