diff --git a/SDL/buchhaltung/frmBU_Mahnlauf.vb b/SDL/buchhaltung/frmBU_Mahnlauf.vb
index e3467884..41510209 100644
--- a/SDL/buchhaltung/frmBU_Mahnlauf.vb
+++ b/SDL/buchhaltung/frmBU_Mahnlauf.vb
@@ -296,6 +296,8 @@ Public Class frmBU_Mahnlauf
             Dim rpt As New rptMahnung(Sprache, MAHNSTUFE, Firma_ID)
             rpt.Document.Printer.PrinterName = ""
 
+            rpt.PageSettings.PaperKind = GrapeCity.ActiveReports.Printing.PaperKind.A4
+
             Dim RG_Bezeichnung As String = ""
 
             Select Case art