Dim s As DataGridViewColumn
        For Each s In DataGridView1.Columns
            s.SortMode = DataGridViewColumnSortMode.NotSortable
        Next s

        For Each dr In dt2.Rows
            test2 = dr("Nummer").ToString
            dr = dt.NewRow
            dt.Rows.Add(test2)
        Next

Those people who think they know everything are a great annoyance to those of us who do - Isaac Asimov