I am trying to port this sub routine over to Excel VBA from Extra basic
Sub Move(ByVal value$, ByVal field$, ByVal enter As Boolean)
Dim x As Integer, y As Integer
x = Left(field, InStr(field, ",") - 1)
y = Mid(field, InStr(field, ",") + 1, (Len(field) -...