sql = " Select * from Rohstoffstamm where Rohstoff-Nr like '" & _
                 flexgrid.TextMatrix(x, 0) & "'"
              [u] rsrohstoffe2.Open sql, Con, adOpenKeyset, adLockOptimistic, _
              adCmdText