diff --git a/SDL/USTV/usrCntlUSTV.vb b/SDL/USTV/usrCntlUSTV.vb
index a0df8629..0a1d7045 100644
--- a/SDL/USTV/usrCntlUSTV.vb
+++ b/SDL/USTV/usrCntlUSTV.vb
@@ -17,7 +17,7 @@ Public Class usrCntlUSTV
     Public kdNr As Integer = -1
     Dim loaded As Boolean = False
 
-    Sub init(Optional kdNr = -1)
+    Sub init(Optional kdNr As Integer = -1)
         pnlFilter.AutoScroll = False
         btnKundendatenaktualisieren.Enabled = False
         '  MsgBox(kdNr)
diff --git a/SDL/kunden/usrcntlKundeBearbeitenFull.vb b/SDL/kunden/usrcntlKundeBearbeitenFull.vb
index af1af926..4c16d3db 100644
--- a/SDL/kunden/usrcntlKundeBearbeitenFull.vb
+++ b/SDL/kunden/usrcntlKundeBearbeitenFull.vb
@@ -1959,6 +1959,8 @@ Public Class usrcntlKundeBearbeitenFull
 
             .DataSource.Columns("bnk_KundenNr").DefaultValue = KUNDE.KundenNr
 
+            .SelectionMode = DataGridViewSelectionMode.CellSelect
+
             .Columns(0).Visible = False
             .Columns(5).Visible = False
             If archivierteDSAnzeigen Then