VegBank

replace code in moveE2toE_runall() with this: (needs test)

With rstTEmp
      'get list of values
     Do Until .EOF
       Dim strList As String
       strList = Trim(Nz(!list, ""))
       If strList <> " " And strList <> "" Then
         If InStr(strList, ",") = 0 Then
           'no commas in the list, convert spaces to commas
           strList = substTextForText(strList, " ", ",")
         End If
       End If
      Call EmptyCollection(colList)
      If csv_listIsNumeric(strList, True, colList) Then