Ejecutar macro al seleccionar un valor de una lista desplegable

[Ditec-Jada 6]

Hola, Quisiera ejecutar una macro automaticamente cuando selecciono un valor de una lista desplegable.

En mi hoja de excel tengo una macro que me crea en cualquier celda una lista desplegable, de estas listas selecciono una dato en cada celda, la idea es ir almacenando esos datos cada vez que cambien en otra hoja del mismo libro.

buscando el amigo ST_ contesto a un usuario algo parecido.

1.-en A1 teniendo una lista de validacion (Datos/validacion de datos/validacion de datos/lista):

en el evento change de la hoja:

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Address = "$A$1" Then MsgBox "selecciono la " & Target.Value

End Sub[/CODE]

2.-seleccione una opcion de la lsita y eva el resultado

Pero como ven solo funciona para una celda en particular, y mis listas desplegables pueden estar en cualquier parte de la hoja.

jada.

[sergioacamposh 10]

En la parte de Target.Address = "" introduce todo el rango donde están tus listas.

[Ditec-Jada 6]

...como ? ya probé:

If Target.Address = "$A$1:$J$50" Then... y If Target.Address = ActiveCell Then...

pero no funcionan.

[sergioacamposh 10]

Prueba el siguiente código:

Private Sub Worksheet_Change(ByVal Target As Range)

If Application.Intersect(Target, [A1:J50]) Is Nothing Then Exit Sub

MsgBox "selecciono la " & Target.Value

End Sub

[/CODE]

Recuerda poner el código en el objeto de la hoja, en el IDE de vba, y funcionará cuando alguna de esas celdas cambie.

[Ditec-Jada 6]

.... voy a probar y ya te comento.

--- Mensaje unido automáticamente ---

SI, ya lo probé, funciona bien!

...te lo agradezco.

--- Mensaje unido automáticamente ---

SI, ya lo probé, funciona bien!

...te lo agradezco.

[sergioacamposh 10]

Tema cerrado.

Saludos y buenas noches.