diff --git a/app/DD_Clipboard_Searcher/frmAdministration.vb b/app/DD_Clipboard_Searcher/frmAdministration.vb
index f6e55d7..1936e9d 100644
--- a/app/DD_Clipboard_Searcher/frmAdministration.vb
+++ b/app/DD_Clipboard_Searcher/frmAdministration.vb
@@ -281,7 +281,7 @@ Public Class frmAdministration
     End Sub
 
     Sub Refresh_Free_Groups(PROFILE_ID As Integer)
-        Dim Sql = String.Format("SELECT DISTINCT * FROM TBDD_GROUPS WHERE INTERNAL = 0 AND GUID NOT IN (SELECT GROUP_ID FROM TBCW_GROUP_PROFILE WHERE PROFILE_ID = {0}) ORDER BY NAME", PROFILE_ID)
+        Dim Sql = String.Format("SELECT DISTINCT * FROM TBDD_GROUPS WHERE GUID NOT IN (SELECT GROUP_ID FROM TBCW_GROUP_PROFILE WHERE PROFILE_ID = {0}) ORDER BY NAME", PROFILE_ID)
         Dim oDataTable = MyDB_DDECM.GetDatatable(Sql)
 
         Try
diff --git a/app/DD_Clipboard_Searcher/frmMain.vb b/app/DD_Clipboard_Searcher/frmMain.vb
index 98b154d..807a3de 100644
--- a/app/DD_Clipboard_Searcher/frmMain.vb
+++ b/app/DD_Clipboard_Searcher/frmMain.vb
@@ -113,9 +113,10 @@ Public Class frmMain
                     RibbonPageGroup1.Visible = False
                     RibbonControl1.Minimized = True
                 End If
-                If BASEDATA_DT_LANGUAGE.Rows.Count > 1 Then
+                If BASEDATA_DT_LANGUAGE.Rows.Count >= 1 Then
                     bbtniKonfig.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
                 Else
+                    Logger.Info("Keine Grundeinstellungen weil keine Sprachen definiert!")
                     bbtniKonfig.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
                 End If