diff --git a/Customers/LKWs.aspx.vb b/Customers/LKWs.aspx.vb
index 9cf2623..85e9044 100644
--- a/Customers/LKWs.aspx.vb
+++ b/Customers/LKWs.aspx.vb
@@ -76,18 +76,43 @@ Partial Class LKWS
 
     Private Sub initcells(thr1 As TableHeaderRow, th1 As TableHeaderCell, th2 As TableHeaderCell, th3 As TableHeaderCell, th4 As TableHeaderCell, th5 As TableHeaderCell, tr1 As TableRow, tc_KfzKennz As TableCell, tc_Nationalitaet As TableCell, tc_Verk As TableCell, tc_KZ_An As TableCell, tc_Vermerk As TableCell, countrows As Integer)
         Dim res As Integer
-        tr1.BackColor = Drawing.Color.FromArgb(0, 4, 51, 129)
+        thr1.BackColor = Drawing.Color.FromArgb(0, 4, 51, 129)
         th1.BackColor = Drawing.Color.FromArgb(0, 4, 51, 129)
         th2.BackColor = Drawing.Color.FromArgb(0, 4, 51, 129)
         th3.BackColor = Drawing.Color.FromArgb(0, 4, 51, 129)
         th4.BackColor = Drawing.Color.FromArgb(0, 4, 51, 129)
         th5.BackColor = Drawing.Color.FromArgb(0, 4, 51, 129)
-
+        th1.ForeColor = Drawing.Color.White
+        th2.ForeColor = Drawing.Color.White
+        th3.ForeColor = Drawing.Color.White
+        th4.ForeColor = Drawing.Color.White
+        th5.ForeColor = Drawing.Color.White
 
         If Math.DivRem(countrows, 2, res) = 0 Then
-
+            tr1.BackColor = Drawing.Color.LightBlue
+            tc_KfzKennz.BackColor = Drawing.Color.LightBlue
+            tc_KZ_An.BackColor = Drawing.Color.LightBlue
+            tc_Nationalitaet.BackColor = Drawing.Color.LightBlue
+            tc_Verk.BackColor = Drawing.Color.LightBlue
+            tc_Vermerk.BackColor = Drawing.Color.LightBlue
+            tr1.ForeColor = Drawing.Color.Black
+            tc_KfzKennz.ForeColor = Drawing.Color.FromArgb(0, 4, 51, 129)
+            tc_KZ_An.ForeColor = Drawing.Color.FromArgb(0, 4, 51, 129)
+            tc_Nationalitaet.ForeColor = Drawing.Color.FromArgb(0, 4, 51, 129)
+            tc_Verk.ForeColor = Drawing.Color.FromArgb(0, 4, 51, 129)
+            tc_Vermerk.ForeColor = Drawing.Color.FromArgb(0, 4, 51, 129)
         Else
-
+            tr1.BackColor = Drawing.Color.WhiteSmoke
+            tc_KfzKennz.BackColor = Drawing.Color.WhiteSmoke
+            tc_KZ_An.BackColor = Drawing.Color.WhiteSmoke
+            tc_Nationalitaet.BackColor = Drawing.Color.WhiteSmoke
+            tc_Verk.BackColor = Drawing.Color.WhiteSmoke
+            tc_Vermerk.BackColor = Drawing.Color.WhiteSmoke
+            tc_KfzKennz.ForeColor = Drawing.Color.FromArgb(0, 4, 51, 129)
+            tc_KZ_An.ForeColor = Drawing.Color.FromArgb(0, 4, 51, 129)
+            tc_Nationalitaet.ForeColor = Drawing.Color.FromArgb(0, 4, 51, 129)
+            tc_Verk.ForeColor = Drawing.Color.FromArgb(0, 4, 51, 129)
+            tc_Vermerk.ForeColor = Drawing.Color.FromArgb(0, 4, 51, 129)
         End If
     End Sub