Ejecutar al hacer click en celda no en fila o columna!
Acabo de hacer una macro que ejecuta acciones si se hace click en un rango definido:
If Not Intersect(Target, Range("A9:A92")) Is Nothing Then
(Esto lo aprendí buscando por ahí, soy nuevo, programando desde ayer)
La macro ejecuta una acción que depende de cada celda: Abre un archivo de imagen cuyo nombre se encuentra en una columna adyacente, en la misma fila de la celda seleccionada, es como un catalogo. He leído por ahí que Excel no es lo más eficaz para esta tarea, pero me funcionó a la perfección. Sin embargo, note un pequeño inconveniente: Cuando se selecciona la fila o la columna donde se encuentra la celda también se muestra la imagen. Esto no seria tan "terrible" en el caso de la fila, a no ser que tenga otras macros en celdas dentro de la misma fila, pero en el caso de la columna, muestra una imagen en la columna designada para tal fin, pero en la primera fila. Claro, yo agregue código para que cuando se seleccione otra celda, borre las imagen anterior (solo una debe ser visible a la vez), pero después que se selecciona la columna, que ocurre el error, pone la imagen inexistente, esta no se borra, a diferencia de las que si están en el rango.
Por esto, es que me pregunto: ¿Es posible ejecutar una macro cuando se seleccione SOLO y SOLO una CELDA, y no mediante selección de fila o columna?
If Not Intersect(Target, Range("A9:A92")) Is Nothing Then
(Esto lo aprendí buscando por ahí, soy nuevo, programando desde ayer)
La macro ejecuta una acción que depende de cada celda: Abre un archivo de imagen cuyo nombre se encuentra en una columna adyacente, en la misma fila de la celda seleccionada, es como un catalogo. He leído por ahí que Excel no es lo más eficaz para esta tarea, pero me funcionó a la perfección. Sin embargo, note un pequeño inconveniente: Cuando se selecciona la fila o la columna donde se encuentra la celda también se muestra la imagen. Esto no seria tan "terrible" en el caso de la fila, a no ser que tenga otras macros en celdas dentro de la misma fila, pero en el caso de la columna, muestra una imagen en la columna designada para tal fin, pero en la primera fila. Claro, yo agregue código para que cuando se seleccione otra celda, borre las imagen anterior (solo una debe ser visible a la vez), pero después que se selecciona la columna, que ocurre el error, pone la imagen inexistente, esta no se borra, a diferencia de las que si están en el rango.
Por esto, es que me pregunto: ¿Es posible ejecutar una macro cuando se seleccione SOLO y SOLO una CELDA, y no mediante selección de fila o columna?
1 Respuesta
Respuesta de Abraham Valencia
1
Si, claro que es posible, pero en realidad no das detalles especifico de tu macro, pero supondré que se trata de un evento de hoja, que debe ser el Change o el SelectionChange. Usarndo el segundo:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$C$4" Then
MsgBox "Celda C4"
End If
End Sub
Abraham
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$C$4" Then
MsgBox "Celda C4"
End If
End Sub
Abraham
