Visual Basic 1

En la siguiente entrada se hará una introducción al lenguaje Visual Basic (VB) que se emplea en excel. Para empezar a programar debemos tener activa la cinta de desarrollador, y luego entrar al entorno de desarrollo, vea la entrada función definida por el usuario. En esta última veremos que la función debe contener la siguiente estructura

Function mf(a,b)

    mf = a + b

End Function

De está manera habíamos creado una función con el único objetivo de sumar dos numeros.

La estructura anterior se emplea cuando deseamos que nuestro código retorne un valor. Las macro poseen una estructura distinta, vea el siguiente código

Sub oc()
       Cells(1, 1) = 3
End Sub

Sub es la palabra reservada que indica que se va a escribir una "Subroutine" (Subrutina), End Sub indica el final del bloque de código. Y al igual que en la entrada función definida por el usuario, todo lo que esta dentro del bloque son variables que deseamos manipular, y dentro del paréntesis, luego de nombre de la función "oc", colocamos los argumentos o parámetros de la función.

Nota: Cells(,) es una función ya implantada en VB en donde los parámetros o argumentos son la fila y columna (celda) a la que se le quiere asignar el valor que está después de la igualdad. En la subrutina de ejemplo hemos asignado el valor numérico de 3 a la celda que está en la fila 1, columna 1.

Las subrutinas luego de crearlas, hemos de asignar teclas de atajo para su correspondiente llamado, y así se ejecutará el código escrito.

Se abrirá la siguiente caja de diálogo, y veremos tantos nombres de macro como subrutinas hayamos escrito. Presionamos el botón de opciones

Y se abre así una nueva ventana en donde, el nombre de la macro, es la seleccionada previamente, y la tecla de método abreviado, por defecto siempre inicia con la tecla CTRL, en el "input box" que está luego del símbolo + escribiremos cualquier letra de nuestra preferencia, a mi en lo particular me gusta emplear "a", Luego damos clic en aceptar, en ambas ventanas abiertas.

Finalmente, si la letra ingresada en el "input box" fue "a", basta con presionar las teclas CTRL y "a" simultáneamente para que se ejecute el código escrito. Y de acuerdo al código anterior (Sub) veremos como aparece el número 3 en la celda cuyas referencias son la fila 1, columna 1.

Modifique el código (Sub) de acuerdo a siguiente figura

Observe que a la linea Cells(1,1) = 3, se le colocó un apóstrofo. Este se emplea para escribir lineas de comentario, generalmente empleadas para documentar el código escrito. Dicha linea es ignorada en ejecución de la Subrutina.

Se ha colocado la función Range()  cuyo argumento/parámetro debe ser el rango al cual se hace referencia. En nuestro caso la celda A1

Les sugiero ver la entrada grabar una macro.

Póngalo en practica :)