Tomando Información de Celdas con Botón de Comando (Command Button)

Ahora que ya nos iniciamos en la programación de macros desde los Formularios, vamos a ver en esta ocasión una macro para presentar en un cuadro de mensaje la información contenida en una celda y esto ocurrirá al dar clic en un Botón de Comando que se inserte en un Formulario.

Objeto Botón de Comando: con el uso de este Objeto, se habilita la interacción entre el usuario y el programa permitiendo ejecutar diversas acciones para aprobar o declinar opciones del formulario.

Lo primero es ingresar al editor de Visual Basic, puede ser con la combinación de teclas Alt + F11 y en la ventana del Explorador de proyectos, ubicamos el libro de trabajo donde queremos insertar el formulario para lo cual damos clic derecho y seleccionamos la opción Insertar de la cual se despliegan tres opciones y finalmente, clic en la opción UserForm:

De esta manera, se inserta el formulario el cual se puede observar dentro de la “estructura” del explorador de proyectos como un Objeto más del libro de trabajo:

Nos ubicamos en la ventana de herramientas que se presenta como una ventana flotante:

La herramienta de Botón de Comando se identifica como un ícono de Botón:

Lo seleccionamos con un clic y luego en el formulario se ingresa el Botón con clic en el espacio donde se requiera. Finalmente se ajustan las Propiedades Caption y Name quedando de la siguiente manera:

En la celda A1 de la Hoja tenemos el siguiente texto:

Ahora, vamos a programar el botón de comando del Formulario dando doble Clic y en el editor de Visual Basic ingresamos el siguiente código:

MsgBox Range("A1").Text

Queda de la siguiente manera en el editor VBA:

Al ejecutar el formulario y dar clic en el botón se muestra el siguiente mensaje:

Descargar archivo de trabajo.

MÁS SOBRE

Gerencie.com en su correo.

Suscríbase y nosotros colocaremos en su bandeja de entrada la mejor información que generamos diariamente.

Siéntase libre de opinar

En Gerencie.com está permitido opinar, criticar, discutir, controvertir, disentir, etc., pero debe hacerlo sin insultar y sin ofender a otros.

Información legal aplicable para Colombia.