Hola
Si lo que quieres es poder decirle a donde quieres ir, prueba este codigo:
--------------------------------------------------------------------
Dim Xpos, YPos, Zpos, Feed As Double
Feed = InputBox("Introduzca Avance deseado:")
Xpos = InputBox("coordenada X " )
Ypos = InputBox("coordenada Y " )
Zpos = InputBox("coordenada Z " )
Code"G01 X" & XPos & " Y" & YPos & " Z" & ZPos
--------------------------------------------------------------------
Ya me diras ......
Saludos