diff --git a/SDL/Formulare/KDFormulare/FormulareBaukasten/usrcntlCBAM_Checkliste.vb b/SDL/Formulare/KDFormulare/FormulareBaukasten/usrcntlCBAM_Checkliste.vb
index f399bf91..28696935 100644
--- a/SDL/Formulare/KDFormulare/FormulareBaukasten/usrcntlCBAM_Checkliste.vb
+++ b/SDL/Formulare/KDFormulare/FormulareBaukasten/usrcntlCBAM_Checkliste.vb
@@ -75,7 +75,7 @@ Public Class usrcntlCBAM_Checkliste
         initControlsHandler()
         cboSprache.Items.Clear()
         cboSprache.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Deutsch", "DE"))
-        'cboSprache.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Englisch", "EN"))
+        cboSprache.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Englisch", "EN"))
 
         cboFirma.Items.Clear()
 
diff --git a/SDL/Formulare/KDFormulare/frmFormulare.vb b/SDL/Formulare/KDFormulare/frmFormulare.vb
index e6afa6af..d0afbfe6 100644
--- a/SDL/Formulare/KDFormulare/frmFormulare.vb
+++ b/SDL/Formulare/KDFormulare/frmFormulare.vb
@@ -1860,9 +1860,12 @@ Public Class FormularManagerNEU
 
         Select Case usrCntl.cboSprache._value
             Case "EN"
-                Return fm.fillPDF("DOKUMENTE", "VORLAGEN", "SONSTIGE", usrCntl.cboFirma._value, "", Name, listTowrite)
+                If usrCntl.cbxNeukunde.Checked Then
+                    MsgBox("Cbam Checklist für Neukunden nicht in ENGLSICH verfügbar!")
+                End If
+                Return fm.fillPDF("DOKUMENTE", "VORLAGEN", "SONSTIGE", usrCntl.cboFirma._value, "", Name & "_EN", listTowrite)
             Case Else
-                Return fm.fillPDF("DOKUMENTE", "VORLAGEN", "SONSTIGE", usrCntl.cboFirma._value, "", Name, listTowrite)
+                Return fm.fillPDF("DOKUMENTE", "VORLAGEN", "SONSTIGE", usrCntl.cboFirma._value, "", Name & "_EN", listTowrite)
         End Select
         Return ""