Dim suchstring As String = ToolStripTextBox1.Text
        If Not String.IsNullOrEmpty(suchstring) Then
           For Each zeile As DataGridViewRow In Me.DataGridView1.Rows
                For Each zelle As DataGridViewCell In zeile.Cells
                    If Not zelle.Value Is Nothing Then
                        If zelle.Value.ToString.Contains(suchstring) Then
                            zelle.Style.BackColor = Color.Bisque
                        End If
                    End If
                Next
            Next
        End If