Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
232to236
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
232to236
232to236
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Wechsel von Druckansicht - zu Normalansicht

Wechsel von Druckansicht - zu Normalansicht
14.03.2003 15:08:03
Christian Witt
Hallo Experten

Habe folgendes Problem:
Ich lasse mir die Druckansicht über Makro erzeugen, wobei ich vorher nach definierten Daten filtere. Verlasse ich nun diese Druckansicht übern den Knopf "Schließen", dann ist in der Normalansicht selbstverständlich der Filter aktiv. Das will ich aber vermeiden.

Wie kann man ein Makro aktivieren beim Übergang von der Druckansicht zur Normalansicht via den Knopf "Schließen"? Oder gibt es andere Lösungen?

Merci für Eure Antworten

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

Betreff
Datum
Anwender
Anzeige
Re: Wechsel von Druckansicht - zu Normalansicht
14.03.2003 15:09:27
Richard

wo ist der code??

Re: Wechsel von Druckansicht - zu Normalansicht
14.03.2003 15:18:57
Christian Witt

Das ist das Makro:

Sub FilternUndDrucken()
'
' FilternUndDrucken Makro
' Makro am 12.03.2003 von Witt, Christian aufgezeichnet
'
' FILTERNAuchBeiBLATTSCHUTZ() Wiederholung des Makros
' sonst Fehler möglich:
ActiveSheet.Protect Password:="Hallo"
ActiveSheet.Protect userinterfaceonly:=True
ActiveSheet.EnableAutoFilter = True
' Das eigentliche Filtern nach Spalte D:
Selection.AutoFilter Field:=4, Criteria1:="<>"
' Seitenansicht Vorschau:
ActiveSheet.PrintPreview
Rows.Hidden = False
Application.ScreenUpdating = True
End Sub

Anzeige
Re: Wechsel von Druckansicht - zu Normalansicht
14.03.2003 15:24:57
Richard

ergänze nach der Seitenansicht
ActiveSheet.AutoFilterMode = False

Re: Wechsel von Druckansicht - zu Normalansicht
14.03.2003 17:57:01
Christian

Super! Merci vielmal Richard.
Gruss Christian

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige