Problem im Druckbereich

Bild

Betrifft: Problem im Druckbereich von: drigi
Geschrieben am: 28.03.2005 14:09:28

Hallo allerseits und schöne Ostern,

habe eine Kasse per Excel angelegt. Würde gerne wissen, wie ich das Dokument so begrenzen kann, dass er nur Blätter druckt, in denen auch etwas steht (keine Leerseiten). Problematik könnten ggf. bei Formeln oder bedingter Formatierung liegen?! Druckbereiche hauen hier nicht hin.

Die Datei ist hochgeladen unter:

https://www.herber.de/bbs/user/20241.xls

Danke für Eure Hilfe.

Gruß Drigi

Bild


Betrifft: AW: Problem im Druckbereich von: Ramses
Geschrieben am: 28.03.2005 14:32:30

Hallo

siehe beiliegende Tabelle.
Dein Sortiermakro hat übrigens auch nicht funktioniert.
Die Zeile 259 ("Ende") und hellblau markiert darf nicht gelöscht werden.
Neue Dateneinträge für dein Kassenbuch sind oberhalb einzufügen.

https://www.herber.de/bbs/user/20242.xls

Gruss Rainer


Bild


Betrifft: AW: Problem im Druckbereich von: drigi
Geschrieben am: 28.03.2005 14:41:32

Hallo Rainer,

danke für Deine Hilfe. Hast Du noch eine Möglichkeit, dass ich den anzusteuernden Drucker auswählen kann?

Gruß Drigi


Bild


Betrifft: AW: Problem im Druckbereich von: Ramses
Geschrieben am: 28.03.2005 14:45:38

Hallo

ersetze den Code mit diesem beispiel

Sub Druck_Datenbereich()
Dim i As Integer
For i = Range("Ende").Row - 1 To 9 Step -1
    If Cells(i, 1) <> "" Then
        ActiveSheet.PageSetup.PrintArea = "$A$1:$G$" & i
        Application.Dialogs(xlDialogPrinterSetup).Show
        ActiveSheet.PrintOut
        ActiveSheet.PageSetup.PrintArea = ""
    End If
Next i
End Sub


Gruss Rainer


Bild


Betrifft: AW: Problem im Druckbereich von: drigi
Geschrieben am: 28.03.2005 15:00:51

Hallo Rainer,

funktioniert soweit einwandfrei, Danke. Aus irgendeinem Grund jedoch schließt er nach Auswahl des Druckers das Auswahlfenster nicht. Ich bekomme es dann erst nach 5 Anläufen geschlossen. Weißt Du was da los sein könnte?

Gruß

Drigi


Bild


Betrifft: AW: Problem im Druckbereich von: Ramses
Geschrieben am: 28.03.2005 15:03:40

Hallo

Sorry, keine Ahnung.
Wenn ich auf OK klicke, schliesst es sich bei mir sofort.

Gruss Rainer


Bild


Betrifft: Datei neu hochgeladen von: Jürgen Drigalsky
Geschrieben am: 28.03.2005 15:11:58

Hallo Rainer,

habe meine Datei noch einmal hochgeladen; ggf. kannst Du sie bei Dir noch mal testen?

https://www.herber.de/bbs/user/20244.xls

Gruß

Drigi


Bild


Betrifft: Funktioniert ohne Probleme o.T. von: Ramses
Geschrieben am: 28.03.2005 15:17:02

...


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Problem im Druckbereich"