Prácticas de Programación de Excel con VBA

Práctica 1. Pintar cuadrados y guardar fichero

Ver Página 21 de documento: https://www.nicolasserrano.com/tools/hojas/Excel_VBA.pdf

Ejecutar la macro Ejemplo_For_Next()

  1. Macro que pinte una serie de cuadrados concéntricos, comenzando con uno del tamaño del lado indicado por la celda activa. El cuadrado se pinta poniendo un color a las celdas que definen el cuadrado. Los pasos recomendados para realizarlo son: Paso 1: dibujar una celda Paso 2: dibujar una línea Paso 3: cuadrado con 4 líneas Paso 4: bucle de cuadrados (todos tienen el mismo vértice inicial Paso 5: colocar el inicio de los cuadrados y configurar color

    cuadrados.png

  2. Crear una macro que guarde el documento activo con una macro.

  3. Modificar la macro, para que guarde el documento en la dirección que se indica en las celdas D1 y E1

  4. Modificar la macro, para que guarde en la dirección que se indica en las celdas D1, los ficheros con los nombres de las celdas seleccionadas, o del rango F1:H4

Práctica 3. Objetos en VBA

  1. Crear una macro, que escribe siguiente información sobre la celda activa, en las celdas A1, B1 y C1. A1: fila de la celda activa B1: columna de la celda activa C1: fórmula de la celda activa
  2. Crear una macro, que realiza la operación anterior para todas las celdas seleccionadas. Para cada celda seleccionada escribirá en las columnas A, B y C de la fila correspondiente, empezando en la fila 1.
  3. Crear una macro que realiza el proceso inverso de la 1, esto es, que lee la información de las columnas A1, B1 y C1 y escribe en la celda indicada por A1 y B1, la fórmula de C1.
  4. Crear una macro que realiza el proceso inverso anterior para todas las filas rellenas en las columnas A, B y C.
  5. Crear una macro que haga lo de la anterior y que cada vez que se encuentre en la columna A el texto “Worksheet”, cree una nueva hoja, con el nombre de la celda a su derecha (columna B) y las siguientes celdas se creen dicha hoja.

Práctica 4. Interfaz de usuario en VBA

  1. Crear una formulario con varios de los controles del Toolbox, con un evento en cada uno, a ser posible actuando el evento en el siguiente control. Ejemplo, el primer control es un label de nombre Label1 que al clicar en él, escribe su Caption en el segundo control que un Textbox.
Private Sub Label1_Click()
   TextBox1.Value = Label1.Caption
End Sub

Práctica 5. Acceso a base de datos

Realizar una consulta a la base de datos del trabajo (de la parte A o nuevo) en base al siguiente ejemplo:

Ficheros Access y configuración