diff --git a/SDL/Creditsafe/usrcntlCreditsafe.vb b/SDL/Creditsafe/usrcntlCreditsafe.vb
index c5d6fd12..c06e4dbb 100644
--- a/SDL/Creditsafe/usrcntlCreditsafe.vb
+++ b/SDL/Creditsafe/usrcntlCreditsafe.vb
@@ -206,7 +206,7 @@ Public Class usrcntlCreditsafe
                 lblWarning.Text = "Daten von Creditsafe sind unvollständig, es kann kein Creditreport erstellt werden!"
                 o.DialogResult = DialogResult.None
             Else
-                Dim a As MsgBoxResult = MsgBox("Die Daten des Unternehmens " & comp.name & " sind unnvollständig " & vbNewLine & "Trotzdem fortfahren?", vbYesNo)
+                Dim a As MsgBoxResult = MsgBox("Die Daten des Unternehmens " & comp.name & " sind unvollständig " & vbNewLine & "Trotzdem fortfahren?", vbYesNo)
                 If a = vbYes Then
                     o.DialogResult = DialogResult.OK
                     Exit Sub