Página inicial  

trans_770 trans_160

Ejercicio paso a paso. Macros con Condiciones Avanzadas


Objetivo.

 

Practicar la creación de Macros con Condiciones Avanzadas.

 

Abrir la base de datos Clases.mdb que se encuentra en la carpeta Mis ejercicios.

Vamos a partir de la macro creada en el anterior ejercicio de esta unidad para después cambiarlo desde la ventana Diseño de Macros.

1 Abre la macro Cambiar2 en Vista de Diseño.

2 Despliega el menú Archivo, y elige la opción Guardar como....

3 Escribe Cambiar3.

4 Haz clic en el botón Aceptar.

Ahora vamos modificar un poco la macro.

Vamos a hacer más estricta la condición, además de que el campo Nombre Curso sea Internet también exigiremos que el nºhoras sea menor que 30.

Además haremos que cuando la condición no se cumpla se muestre un cuadro de mensaje avisándolo.

Cuando se cumpla la condición también aumentaremos el nºhoras en 5, avisaremos con otro cuadro de mensaje y saldremos.

5 Selecciona la acción BuscarRegistro.

6 En Argumentos de Acción cambia el valor de la opción Buscar a Internet.

7 Haz clic sobre la línea de línea de Cerrar y pulsaremos 4 veces el botón de Insertar fila para insertar 4 nuevas filas en blanco.

8 Haz clic sobre la última línea de Eco y pulsaremos 1 vez el botón de Insertar fila para insertar 1 nueva fila en blanco.

Ya tenemos los espacios preparados, ahora hagamos los cambios

9 Modificaremos la Condición que dice [Formularios]![Cursos tabular]![Nombre Curso]="Papiroflexia" para que pueda leerse [Formularios]![Cursos tabular]![Nombre Curso]="Internet" Y [Formularios]![Cursos tabular]![Nº horas]<30.

10 En la columna Condición de las cuatro siguientes filas (que están en blanco) escribiremos puntos suspensivos (...) para que estas acciones se realicen si la condición se cumple.

En el caso de que la condición no se cumpliese, se saltaría todas estas acciones y pasaría directamente a la acción de Cerrar.

Ahora seguiremos con las acciones que se realizarán si se cumple la condición. Como el cambio del campo Nombre Curso se realizará vamos con el nºhoras.

11 En la primera línea en blanco seleccionaremos la Acción EstablecerValor.

12 En Argumentos de acción escribiremos [Formularios]![Cursos tabular]![Nº horas] en Elemento.

13 Escribe [Formularios]![Cursos tabular]![Nº horas] + 5 en el campo Expresión para aumentar en el nºhoras.

Como ya no necesitamos más el formulario lo cerramos.

14 En la siguiente línea en blanco selecciona la Acción Cerrar.

15 En los Argumentos de acción selecciona Formulario en la opción Tipo de objeto.

16 Selecciona Cursos tabular en el desplegable Nombre del objeto.

17 Seleciona en la opción Guardar para guardar los cambios al cerrar.

Seguiremos mostrando un cuadro de mensaje avisando del cambio.

18 En la siguiente línea en blanco selecciona en la columna Acción CuadroMsj.

19 En el argumento Mensaje escribe Los campos 'Nombre Curso' y 'nºhoras' se han actualizado correctamente..

20 Cambia la opción Bip a No.

21 Cambia la opción Tipo a Aviso: !.

22 En la opción Título escribe Actualización Realizada.

Y ya habremos terminado, por lo que ahora deberemos parar la Macro para que no siga ejecutándose.

23 En la siguiente línea en blanco selecciona la Acción DetenerMacro.

Hemos terminado con todas las acciones que se realizarán si la condición resulta verdadera, ahora pasaremos a configurar lo que debe hacer la Macro si esta no se cumple.

24 Selecciona la siguiente Acción Cerrar.

Cambiaremos sus argumentos, pues no necesitamos que aquí se guarde el formulario, porque no se habrá realizado ningún cambio.

25 En los Argumentos de acción cambia el valor de la opción Guardar a No.

Y finalmente añadiremos un cuadro de mensaje para avisar de que no se han realizado cambios en el Formulario.

26 Selecciona la última línea que nos queda en blanco y elige la opción CuadroMsj en Acción.

27 En los Argumentos de acción escribe en el campo Mensaje No se ha modificado ningún campo.@Ningún registro cumplía los criterios establecidos.@.

28 Cambia la opción Bip a No.

29 Cambia la opción Tipo a Crítico.

30 En la opción Título escribe Error.

Hemos acabado, después de la condición, si es falsa, la macro cerrará el formulario sin guardarlo y avisará al usuario.

 

Aquí tienes una imagen de cómo debería quedar la Macro después de estos cambios:

 

31 Guarda la Macro y ejecútala sólo una vez.

32 Abre la tabla Cursos para comprobar que ahora tenemos dos cursos de Diseño Web y que el segundo curso tiene 5 horas más de las que tenía.

33 Cierra la Macro.

 

   
   
Aviso legal: este curso es gratuito siempre que se visualice desde la página web de aulaClic. No está permitido descargar el curso y utilizarlo en academias o centros de enseñanza privados sin estar conectado a Internet.
© aulaClic. Todos los derechos reservados. Free Computer tutorials. Prohibida la reproducción por cualquier medio.
Mayo - 2006.