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
736to740
736to740
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Drucken in UF mit Ausgeblendeten Blättern

Forumthread: Drucken in UF mit Ausgeblendeten Blättern

Drucken in UF mit Ausgeblendeten Blättern
24.02.2006 19:45:50
Heinz
Hallo Leute
Gibt es eine Möglichkeit auch aus einer UF Blätter auszudrucken,wenn diese Ausgeblendet sind ?
Blätter heissen genau so wie in den CheckBoxen.
Also 311,312A usw.
Danke,Heinz

Private Sub DruckenButton_Click()
'Blattnamen jeweils anpassen!
If CheckBox1 Then Sheets("311").PrintOut
If CheckBox2 Then Sheets("312A").PrintOut
If CheckBox3 Then Sheets("312B").PrintOut
If CheckBox4 Then Sheets("321").PrintOut
If CheckBox5 Then Sheets("322").PrintOut
If CheckBox6 Then Sheets("331").PrintOut
If CheckBox7 Then Sheets("332").PrintOut
If CheckBox8 Then Sheets("333").PrintOut
If CheckBox9 Then Sheets(Array("311", "312A", "312B", "321", "322", "331", "332", "333")).PrintOut
Unload Me
End Sub

Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Drucken in UF mit Ausgeblendeten Blättern
24.02.2006 19:58:28
Dieter
Hi,
ausgeblendete Blätter können nicht gedruckt werden.
mfg Dieter
AW: Drucken in UF mit Ausgeblendeten Blättern
24.02.2006 20:01:15
Heinz
Hallo Dieter
Danke für Deine Antwort.
Na Schade dann muss ich halt alle eingeblendet lassen.
Danke & Gruss,Heinz
AW: Drucken in UF mit Ausgeblendeten Blättern
24.02.2006 20:18:05
PeterW
Hallo Heinz,
schalte die Bildschirmaktualisierung )Application.ScreenUpdating = False) aus, blende die Blätter ein, drucke sie, blende sie wieder aus und schalte die Bildschirmaktualisierung wieder ein ( = True).
Gruß
Peter
Anzeige
AW: Drucken in UF mit Ausgeblendeten Blättern
24.02.2006 20:14:42
Reinhard
Hi Heinz,
wieso das denn? Blende sie doch alle vor den If-Abfragen ein (hidden oder visible, verwechsle das immer*g, siehe in der Hilfe nach), dann druckst du aus, dann versteckst du sie wieder mit "xlveryhidden".
Und application.screenupdating=false bzw am Codeende =true benutzen.
Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
AW: Drucken in UF mit Ausgeblendeten Blättern
24.02.2006 20:29:01
Heinz
Hallo Reinhard
Habe unteren Code geändert,habe wahrscheinlich irgendwo Blödsinn gemacht.
Könntest Du mir da bitte weiterhelfen?
Danke,Heinz

Private Sub DruckenButton_Click()
'Blattnamen jeweils anpassen!
Application.ScreenUpdating = False
Application.Visible
If CheckBox1 Then Sheets("311").PrintOut
If CheckBox2 Then Sheets("312A").PrintOut
If CheckBox3 Then Sheets("312B").PrintOut
If CheckBox4 Then Sheets("321").PrintOut
If CheckBox5 Then Sheets("322").PrintOut
If CheckBox6 Then Sheets("331").PrintOut
If CheckBox7 Then Sheets("332").PrintOut
If CheckBox8 Then Sheets("333").PrintOut
If CheckBox9 Then Sheets(Array("311", "312A", "312B", "321", "322", "331", "332", "333")).PrintOut
Unload Me
Application.xlVeryHidden
Application.ScreenUpdating = True
End Sub

Anzeige
AW: Drucken in UF mit Ausgeblendeten Blättern
25.02.2006 00:35:36
Reinhard
Hi Heinz,
Option Explicit
Private Sub DruckenButton_Click()
'Blattnamen jeweils anpassen!
Dim n
Application.ScreenUpdating = False
For n = 1 To ThisWorkbook.Worksheets.Count
Worksheets(n).Visible = True
Next n
If CheckBox1 Then Sheets("311").PrintOut
If CheckBox2 Then Sheets("312A").PrintOut
If CheckBox3 Then Sheets("312B").PrintOut
If CheckBox4 Then Sheets("321").PrintOut
If CheckBox5 Then Sheets("322").PrintOut
If CheckBox6 Then Sheets("331").PrintOut
If CheckBox7 Then Sheets("332").PrintOut
If CheckBox8 Then Sheets("333").PrintOut
If CheckBox9 Then Sheets(Array("311", "312A", "312B", "321", "322", "331", "332", "333")).PrintOut
For n = 1 To Worksheets.Count
'wiedereinblenden geht nur mit vba, ansonsten Worksheets(n).Visible = false
Worksheets(n).Visible = xlVeryHidden
Next n
Unload Me
Application.ScreenUpdating = True
End Sub

Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
AW: Drucken in UF mit Ausgeblendeten Blättern
25.02.2006 05:05:21
Heinz
Hallo Reinhard
Recht herzlichen Dank,für Deine Hilfe !!!
Gruss,Heinz
;

Forumthreads zu verwandten Themen

Gruppierung mit ausgeblendeten Spalten
Leander

Hallo Zusammen!
Ist möchte eine Spalte, beispielsweise Spalte "E" ausblenden, die jedoch in einem Gruppierungsbereich, Spalten "C:G", liegt.
So weit so gut, schließe ich diese Gruppe und öffne diese wieder, ist auch die vorher ausgeblendete Spalte wieder sichtbar.

Kann ich das...
13.11.2008 06:59:45
Thread-ID: 1024010
3 Beiträge
Anzeige
Summieren in Listen mit ausgeblendeten Zeilen
Rudi

Hallo Excel-Forum.
ich habe eine Excel-Liste mit ausgeblendeten Zeilen (nicht gefilter!). Gibt es für das Summieren der angezeigten Zeilen auch eine Funktion?
Gruß Rudi
29.06.2009 09:24:38
Thread-ID: 1085012
3 Beiträge
Hyperlinks von ausgeblendeten Tabellenblättern
ausgeblendeten

Hallo zusammen,
ich habe ein Excel Dokument, mit mehreren ausgeblendten Tabellenblättern. [worksheets("a").visible = false]
Auf einem (eingeblendeten) Tabellenblatt listet ein Makro alle vorhandenen Tabellenblätter auf und wandelt diese Liste in Hyperlinks um.
Wenn ich solch einen...
15.09.2009 16:50:23
Thread-ID: 1103014
4 Beiträge
Anzeige
find match in ausgeblendeten Zeilen
chris

Hallo Spazialisten,
ich bekomme es einfach nicht hin und bitte euch um Hilfe.
Ich habe eine Datei.In dieser sind 2 Sheets.
In dieser stehen in sheet 1 Nummen die auch in Sheet zwei auftauchen.
Ich blende jetzt alle Zeilen aus in Sheet 2
ws2.Rows("6:50000").EntireRow.Hidden =...
22.02.2010 11:14:41
Thread-ID: 1140259
10 Beiträge
Anzeige
druck von ausgeblendeten Arbeitsblättern
ausgeblendeten

Hallo,
da mein Excel Wissen, und vor allem die Makroprogramierung doch zumindest leicht eingerostet sind bräuchte ich eure Hilfe.
Wie mach ich, dass dieses Makro auch funktioniert wenn ich die zu druckenden Blätter ausblende.
Private Sub Antrag_Click() Worksheets(Array("3. Antrag",...
24.06.2010 10:04:53
Thread-ID: 1163821
4 Beiträge
SVERWEIS in ausgeblendeten Zellen
trompete

Hallo nochmal und alle Genie's
mit der freundlichen Unterstützung von Hary habe ich eine Code bekommen der mir, in Anbhängigkeit vom Inhalt einer bestimmten Zelle, eine Bereich vordefinierter Zeilen ausblendet. Soweit so gut, nur habe ich jetzt im dem Bereich der auszublenden Zeilen einen S...
26.09.2010 20:07:54
Thread-ID: 1179463
5 Beiträge
Problem mit ausgeblendeten Zellen
Matthias

Hallo
Ich habe einen Katalog der zum jeweiligen Artikel ein Bild läd.
Die Bildnummer steht in eimem Bereich in dem die Zellen ausgeblendet sind.
Beim Abfragen mit .Value bekomme ich die Bildnummer geliefert und .Text nicht.
Blende ich die Zellen ein geht es auch mit .Text.
W...
08.11.2010 15:14:14
Thread-ID: 1185697
3 Beiträge
Anzeige
Suchen in ausgeblendeten Spalten
Gregor

Hallo
Diese Frage wurde im Forum 2005 gestellt, jedoch ohne Antwort. Bei folgendem Code
Spalte_Eigner = .Rows(1).Find(What:="Eigner", After:=.Cells(1, 1), LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=True, SearchFormat:=False).Column
...
12.04.2011 11:52:58
Thread-ID: 1209991
6 Beiträge
Suchen in ausgeblendeten Spalten
Florian

Hallo Experten,
ich suche mit VB wie folgt:
-----
With ActiveSheet.Range("b:b")
Set zelle = .Find(suchwert, lookin:=xlValues)
End With
-----
Soweit, so gut... nur leider ist bei mir die Spalte B (also der Suchbereich) eine ausgeblendete Spalte!
Das Makro...
24.05.2002 09:52:19
Thread-ID: 123347
3 Beiträge
Sicherung bei einem ausgeblendeten Tabellenblatt
chris58

Kann leider den Tread nicht mehr aufmachen. Habe daher die letzte Antwort hier reinkopiert.
Hallo Reinhard !
Wenn ich das
if Sheets(i).visible=true Then Sheets(i).copy
eingebe, dann sichert er mir zwar, aber die Datei wird geschlossen.
........................................
04.07.2011 11:10:38
Thread-ID: 1220811
9 Beiträge
Checkbox in ausgeblendeten Zeilen
Tobias

Liebe Forumsmitglieder,
ich habe ein Problem mit Office 2010 und Kontrollkästchen in ausgeblendeten Zeilen. Wenn in angehängter Datei die Zeilen 4-12 aus- und wieder eingeblendet werden, bleiben die Positionen der Kontrollkästchen unverändert.
Speichere ich das Dokument jedoch im ausg...
29.08.2011 11:33:28
Thread-ID: 1227878
2 Beiträge
Suchen auch in ausgeblendeten Zeilen möglich?
Claus

Hallo zusammen,
unter bearbeiten/suchen wird ja ein Begriff der in einer durch Filterung ausgeblendeten Zeile steht, nicht gefunden. Meist ist das auch sinnvoll.
Gibt es aber auch eine Möglichkeit, dass eine zwar ausgeblendete aber den Begriff enthaltende Zelle angezeigt wird?
Ich...
30.09.2011 13:28:14
Thread-ID: 1232135
15 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