Using sw As StreamWriter = New StreamWriter( _
            "selectedordnerSpeicher.txt")
                For Each Selectedordner1 As DataGridViewRow In _
                DataGridView1.Rows
                    Dim selectedordner As String = Selectedordner1.Cells( _
                    clmPfad.Name).Value
 
 
 
 
                    If ?????? = True Then
                     'bei diesem If Befehl versuche ich die angehackten Items 
                     ' herauszufinden
 
 
                        sw.WriteLine(selectedordner)
 
 
 
                    End If
                Next
            End Using

            Using sw As StreamWriter = New StreamWriter( _
              "selectedordnerSpeicher.txt")
                For Each Selectedordner1 As DataGridViewRow In _
                DataGridView1.Rows
 
 
                    If Selectedordner1.Cells(clmIsChecked.Name).Value = True _
                      Then
                        Dim selectedordner As String = Selectedordner1.Cells( _
                        clmPfad.Name).Value
                        sw.WriteLine(selectedordner)
 
 
                    End If
                Next
            End Using