Desplazar Boton de Comando en Formulario

[Enigma25]

Buenas tardes

Tal como lo dicta el titulo de este tema "Desplazar Boton de Comando en Formulario", adjunto un archivo contenido de un formulario y en cual cuenta con un boton.

Dicho boton se mueve dentro de formulario de acuerdo a la nueva posicion en donde se dió click con el mouse, todo esto en el evento UserForm_MouseDown:

Breve muestra del codigo:

Private Sub UserForm_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Single, ByVal y As Single)
CommandButton1.Move (x - CommandButton1.Width / 2), (y - CommandButton1 / 2)
End Sub
[/PHP]

Es algo sencillo que quizas lo vean sin utilidad al principio, pero estoy seguro que luego, tendrá imaginacion para darle un buen uso.

Claro está que primero, es necesario contar con la logica del código para luego sacarle el mayor provecho.

Mis respetos para todos y muchas bendiciones.

Desplazar Boton de Comando en Formulario.zip