Imprimir página | Cerrar ventana

Capturar el mismo evento de varios objetos

Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=86890
Fecha de impresión: 26/Marzo/2026 a las 21:10


Tema: Capturar el mismo evento de varios objetos
Publicado por: Bepb
Asunto: Capturar el mismo evento de varios objetos
Fecha de publicación: 20/Marzo/2024 a las 17:35
Hola,

    Tengo una serie de botones en un formulario y quisiera saber si hay una macro que pueda capturar todos los eventos click de todos estos botones para no repetir el mismo código en cada uno de éstos.

He probado el Handles pero me tira un error de que no conoce esta instrucción. También tendría que saber que botón ha disparado el evento Click:

Private Sub Button1_Click() Handles Button1.Click, Button2.Click, (etc...)

     Accessosw = Mid(Me.Button1.Name, 6, 4)

...
End Sub

Un saludo.


-------------
Saludos desde Menorca. José Luis



Respuestas:
Publicado por: xavi
Fecha de publicación: 20/Marzo/2024 a las 17:54
Hola,

Puedes asignar una Function directamente a evento en la hoja de propiedades o, como me gusta a mi, en el evento Load del formulario

Me!UnBoton.OnClick = "=MiFuncion()"
Me!OtroBoton.OnClick = "=MiFuncion()"

un saludo


-------------
Xavi, un minyó de Terrassa

http://www.llodax.com" rel="nofollow - Mi web


Publicado por: Bepb
Fecha de publicación: 21/Marzo/2024 a las 16:48
Hola Xavi,

    La que indicas de la función en el Load() es muy buena opción porque así tienes todo en el código.

Gracias.
Se puede cerrar el tema.


-------------
Saludos desde Menorca. José Luis



Imprimir página | Cerrar ventana