Visual Basic - Dividir campos de una tabla

Tengo un campo en una BD de Access que almaceba apellidos y nombres a la vez, necesito dividirlos y dejar los apellidos en un campo y los nombres en : nombre1 y nombre2,
para ello necesito buscar los caracteres en blanco en una cadena para hacer la separacion, o alguien tiene otro forma de hacerlo

Gracias

Puedes usar por ejemplo la función Split y luego recorrer el vector que se forma:

Vector = Split(Campo," ")

For i=LBound(Vector) To UBound(Vector)
Debug.Print Vector(i)
Next i

Luego decides con cada posición donde la almacenas. Antes debes asegurarte la cantidad de nombres y apellidos de cada persona, es decir si alguien tiene más de dos nombres o uno solo y dos apellidos o uno.