Requisitos de programación Vba
Primero, abra PowerPoint 2013 y presione ALT+F11 para abrir el editor VBA. En la ventana del navegador de proyectos a la izquierda, haga doble clic en "Esta presentación" para abrir la ventana del código de la presentación.
En la ventana Código, ingrese el siguiente código:
Opción explícita
Private subshape_Click()
Se etiquetará la forma en la que se hizo clic. Forma
Establecer clickedShape = ActiveWindow. Selection.ShapeRange(1)
Realice las operaciones correspondientes según el nombre u otros atributos del botón gráfico en el que se hizo clic.
Selecciona el caso y haz clic en la forma. Nombre
Caso "botón 1" primer botón
Agregue código para mostrar el contenido apropiado aquí.
MsgBox "Haga clic en el botón 1"
Caso "Botón 2" Segundo botón
Agregue código para mostrar el contenido correspondiente aquí.
MsgBox "Se hizo clic en el botón 2"
Agregar más lógica de procesamiento de botones
Finalizar selección
Finalizar conector
En el código, utilizamos el controlador de eventos Shape_Click para capturar el evento de clic del botón de forma. En el controlador de eventos, primero obtenemos el botón gráfico en el que se hizo clic y luego usamos la instrucción Seleccionar caso para realizar la operación correspondiente según el nombre del botón u otras propiedades. Puede modificar las condiciones y operaciones de la declaración Seleccionar caso de acuerdo con la situación real para lograr las funciones que necesita.
Tenga en cuenta que debe reemplazar "Botón1" y "Botón2" en el código con los nombres u otras propiedades de los botones gráficos que realmente esté utilizando.
Después de escribir el código, guarde y cierre el editor VBA. Luego, inserte botones gráficos en PowerPoint y establezca un nombre correspondiente u otras propiedades para cada botón para identificarlo en el código.
Cuando haces clic en un botón gráfico en la presentación, se ejecuta el código correspondiente y se muestra el contenido correspondiente según el nombre del botón u otras propiedades.
Espero que este ejemplo pueda ayudarte a satisfacer tus necesidades. Si tiene alguna otra pregunta, no dude en preguntar.