Unidad 14. Ejercicio paso a paso: Crear macro condicional


Objetivo

Practicar la creación de Macros con una condición.

Ejercicio paso a paso

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

Vamos a partir de la macro creada en el primer ejercicio de esta unidad para después cambiarla desde la ventana Diseño de macros.

En el ejercicio anterior vimos que si no encontraba el registro con el valor buscado modificaba el primer registro.

Vamos a solventar esto.

  1. En el Panel de navegación, haz clic con el botón derecho del ratón sobre la macro Cambiar1 y elige Copiar.
  2. Ahora, en el mismo panel, muestra de nuevo el menú contextual y pulsa Pegar.
  3. Cuando te pregunte qué nombre darle a la copia, escribe Cambiar2.
  4. Haz clic en el botón Aceptar.
  5. Abre en Vista Diseño la nueva macro Cambiar2.

Ahora vamos a insertar una condición para que esto no ocurra.

  1. En el catálogo de acciones, haz clic en la opción Si de Flujo de programas. Se añadirá el panel en la ventana principal, en último lugar.
  2. En el cuadro de texto Si escribe la condición siguiente: [Formularios]![Cursos tabular]![Nombre Curso]="Papiroflexia".
  3. Ahora, arrastra la Acción EstablecerValor hasta la lista Agregar nueva acción del panel condicional.
  4. Sólo queda situar la condición en el lugar correcto. Pulsa la flecha Subir hasta que se sitúe justo bajo la acción de búsqueda (dos posiciones más arriba).

Aquí tienes una imagen que ilustra como habrá quedado la macro:

Hemos hecho que antes de cambiar el valor se asegure de que se encuentra en un registro con el valor Papiroflexia. En caso contrario se saltará esta acción y pasará a las siguientes: Cerrar y Eco.

Ya no cambiará el campo si no encuentra ningún valor que diga Papiroflexia.

  1. Guarda los cambios y ejecuta la macro con el botón Ejecutar Botón Ejecutar.
  2. Cierra la macro.
  3. Abre la tabla de Cursos y comprueba que el primer registro no ha cambiado.
  4. Cierra la base.

Octubre-2010

   Inicio    




Curso de Access 2013
.