Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
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
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
1028to1032
1028to1032
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ausgeblendete Zeilen werden ausgedruckt

Forumthread: Ausgeblendete Zeilen werden ausgedruckt

Ausgeblendete Zeilen werden ausgedruckt
09.12.2008 12:39:59
Josef
Hallo Profis,
Wenn in bestimmten Zellen eine 0 steht soll der definierte Bereich (Zeilen) ausgeblendet werden.
Das funktioniert aber nur im ersten Bereich, bei weiteren werden in der Seitenansicht nur leere Seiten angezeigt und dann auch ausgedruckt, was nicht gewünscht ist.
Zum besseren verständnis habe ich eine Dummy Datei hochgeladen.
https://www.herber.de/bbs/user/57480.xls
Ich bin für jede Lösung dankbar.
Danke
Josef
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Ausgeblendete Zeilen werden ausgedruckt
09.12.2008 13:11:05
Rudi
Hallo,
wozu setzt du die PrintArea? Ausgeblendete Zeilen werden doch ohnehin nicht gedruckt.

Sub drucken()
Application.ScreenUpdating = False
With ActiveSheet
'001/001
.Rows("1:125").Hidden = .Range("A18") = "0"
'001/002
Rows("126:250").Hidden = .Range("A143") = "0"
'001/003 leer
.Rows("251:376").Hidden = .Range("A268") = "0"
'002/001
.Rows("377:501").Hidden = .Range("A394") = "0"
'002/002
.Rows("502:626").Hidden = .Range("A519") = "0"
'002/003
.Rows("627:751").Hidden = .Range("A644") = "0"
.PageSetup.PrintArea = "A:G"
.PrintPreview
'PrintOut
.PageSetup.PrintArea = ""
.Rows.Hidden = False
End With
Application.ScreenUpdating = True
End Sub


Gruß
Rudi

Anzeige
AW: Ausgeblendete Zeilen werden ausgedruckt
09.12.2008 13:33:00
Josef
Hallo Rudi,
danke für die Antwort. Habe deinen Code eingesetzt, leider funktioniert es nicht.
Range("A18") ="0"
Zeilen 1:125 werden als leere Seiten angezeigt
Range("A143") = "0"
Zeilen 126:250werden als leere Seiten angezeigt
dann folgen die Bereiche in denen in den Zellen A286, A399, A519, A699 Werte enthalten sind.
Steht in A399 eine 0, werden auch leere Seiten angezeigt
Anzeige
AW: Ausgeblendete Zeilen werden ausgedruckt
09.12.2008 13:42:00
Rudi
Hallo,

in den Zellen A286, A399, A519, A699


Die werden doch gar nicht abgefragt.
Du solltest auch mal auf 0 anstatt "0" testen.
Gruß
Rudi

AW: Ausgeblendete Zeilen werden ausgedruckt
09.12.2008 13:46:00
Josef
Hallo,
funktioniert auch nicht. Gleiches Ergebnis wie vorher.
Gruß
Josef
Anzeige
;

Forumthreads zu verwandten Themen

Automatisches füllen von Zeilen aus Spalten
Zeilen

Hallo,
ich habe eine Datei, sie besteht aus 2 Tabellenblättern. Im Tabellenblatt "Ursprung" stehen die Daten, wie man sieht in einer Zeile nebeneinander. Ich habe nun diese Zeile mittels "Transportieren" in eine Spalte untereinander kopiert (im Tabellenblatt "Problem").
Nun habe ich ein...
24.10.2008 15:37:41
Thread-ID: 1019049
6 Beiträge
Filtern in Zeilen
Andreas

Guten Morgen,
ist es möglich im Excel waagerecht zu filtern? Zum Beispiel sollte in Zeile 2 nach allen Spalten gesucht werden die den Wert "x" enthalten. D.h alle anderen Spalten die nicht dem Suchktrerium entsprechen müssten ausgeblendet werden.
Ist soetwas (ggf ohne Makro) möglich?
07.11.2008 06:20:00
Thread-ID: 1022476
7 Beiträge
ausgeblendete Zeilen auf Blattkopie auch ausblende
Thomas

Hallo,
ich habe folgendes Problem:
Mittels VBA und der Funktion PastSpecial kopiere ich ein Tabellenblatt, welches ausgeblendete Zeilen enthält.
Zum Einfügen des zu kopierenden Inhaltes verwende ich die o.a. Funktion zwei mal:
Zielblatt.Range(Quellenblatt.UsedRange.Address).Past...
20.11.2008 09:18:00
Thread-ID: 1026312
3 Beiträge
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
Anzeige
Kann Zeilen, die DA SIND, nicht mehr einblenden!!!
Stephan

Liebe Liste,
habe hier ein Problem, das mich fast verzweifeln läßt!
Ich habe 4 Zeilen am Anfang einer Datei, die sich partout nicht mehr einblenden lassen! Ich kann dort mit den Pfeiltasten der Tastatur hinlaufen, sehe oben in der Wertezeile auch den Wert der Zellen, in denen Inhalt ste...
25.01.2009 12:52:00
Thread-ID: 1043550
11 Beiträge
Zeilennr. in gefilterten und markierten Bereich
Kasimir

Hallo Leute,
ich stehe auf dem Schlauch und weiß ehrlich auch nicht so ganz, ob das was ich realisieren möchte überhaupt geht?
Also, ich filtere über den Autofilter Daten. Bei diesen gefilterten Daten möchte ich danach einen Bereich, also mehrere zusammenhängende Zellen in einer Spalte...
04.04.2009 08:21:59
Thread-ID: 1066813
7 Beiträge
Abhaengige ComboBox - automatische Zeilenausgabe
AnRo

Hallo zusammen,
ich bin absoluter vb anfaenger und moechte folgende Loesung mit vb realisieren.
Ein Dateiname soll automatisch generiert werden. Hierzu werden drei Comboboxen ausgewaehlt und danach soll der Dateiname entsprechend der Auswahl ausgegeben werden.
Hierzu habe ich bereit...
26.05.2009 15:32:32
Thread-ID: 1077443
4 Beiträge
Anzeige
kleinster, resp grösster nicht ausgeblendeter Wert
Peter

Guten Abend
Ich möchte aus einem Spaltenbererich den grössten, resp. den kleinsten Wert ermitteln. Dabei dürfen nur Werte aus nicht ausgeblendeten Zeilen berücksichtigt werden.
Wie kann ich das anstellen?
Danke für eine Antwort.
Gruss, Peter
16.06.2009 20:38:45
Thread-ID: 1082045
2 Beiträge
ausgeblendete Zeilen mit einbeziehen
SteffenS

Hallo Zusammen,
ich ermittle meinen Bereich mit:
WS.Range(WS.Cells(16, 5), WS.Cells(i - 1, 34)).Interior.ColorIndex = xlNone
Leider werden dabei ausgeblendete Zeilen ignoriert.
Was muss ich tun damit die Zeilen mit geändert werden?
Danke im Voraus.
Steffen Schmerler
01.04.2010 21:42:39
Thread-ID: 1149923
6 Beiträge
ausgeblendete Zeilen mit einbeziehen
SteffenS

Hallo Zusammen,
ich ermittle meinen Bereich mit:
WS.Range(WS.Cells(16, 5), WS.Cells(i - 1, 34)).Interior.ColorIndex = xlNone
Leider werden dabei ausgeblendete Zeilen ignoriert.
Was muss ich tun damit die Zeilen mit geändert werden?
Danke im Voraus.
Steffen Schmerler
01.04.2010 22:11:28
Thread-ID: 1149928
2 Beiträge
Zeilen einfügen bei Autofilter
Martin

Hallo liebe Herber-Gemeinde,
ich habe in einer Datei einen Autofilter gesetzt und möchte mehrere gefilterte Zeilen in eine andere Datei mit identischem Aufbau hineinkopieren. Die Spaltenanzahl und Benennung ist in der 2. Datei wie gesagt genau derselbe und dort verwende ich ebenfalls einen...
03.08.2010 11:07:34
Thread-ID: 1170150
2 Beiträge
Zeilen einfügen bei Autofilter
Martin

Hallo liebe Herber-Gemeinde,
ich habe in einer Datei einen Autofilter gesetzt und möchte mehrere gefilterte Zeilen in eine andere Datei mit identischem Aufbau hineinkopieren. Die Spaltenanzahl und Benennung ist in der 2. Datei wie gesagt genau derselbe und dort verwende ich ebenfalls einen...
03.08.2010 11:06:50
Thread-ID: 1170154
3 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