no logro ver bien que intentas, pero si es dezplazar la ubicacion de un commandbutton dentro de un userform de acuerdo a algun intervalo de tiempo, yo utilizaria un instruccion Application.Ontime dentro de un procedimiento mas o menos as:
Sub Aplicacion()
Application.OnTime Now + TimeValue("00:00:01"), "aplicacion"
UserForm1.CommandButton1.Left = UserForm1.CommandButton1.Left + 5
End Sub
esto lo escribiria dentro del evento initialize del userform, asi cada 1 segundo el commanbutton se desplazaria 5 unidades hacia la derecha.
tendrias que añadirle un control al sub de aplication para que no se ejecute infinitamente, solo hasta el borde del userform.
