diff --git a/VERAG_PROG_ALLGEMEIN/Classes/cMDMFunctionsAllgemein.vb b/VERAG_PROG_ALLGEMEIN/Classes/cMDMFunctionsAllgemein.vb
index 84d6a60f..26e92587 100644
--- a/VERAG_PROG_ALLGEMEIN/Classes/cMDMFunctionsAllgemein.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/cMDMFunctionsAllgemein.vb
@@ -996,7 +996,7 @@ Public Class cMDMFunctionsAllgemein
                                 Dim _width = pdfReader.GetPageSizeWithRotation(page).GetRight(0) / 2 'Mitte
 
                                 'Workaround!
-                                If _height > 2000 Then
+                                If _height > 1500 Then
                                     canvas.SetFontAndSize(bf, 45)
                                     _height -= 70
                                 End If
diff --git a/VERAG_PROG_ALLGEMEIN/frmScan.vb b/VERAG_PROG_ALLGEMEIN/frmScan.vb
index 755b00c9..369673dd 100644
--- a/VERAG_PROG_ALLGEMEIN/frmScan.vb
+++ b/VERAG_PROG_ALLGEMEIN/frmScan.vb
@@ -243,8 +243,8 @@ Public Class frmScan
         'startScanTimeout()
         startScan()
 
-        'cboFormat.SelectedIndex = cboFormat.FindStringExact("A4")
-        'If cboFormat.SelectedIndex > 0 Then cbxAltFormat.Checked = True
+        cboFormat.SelectedIndex = cboFormat.FindStringExact("A4")
+        If cboFormat.SelectedIndex > 0 Then cbxAltFormat.Checked = True
 
 
     End Sub