Doble click en celda y mostrar el valor de la propia celda en un msgbox (solo columnas dónde celda en fila 2 = "Observaciones"

Entiendo que con el propio titulo ya se entiende cual es el objetivo.

El problema es que las celdas de las columnas "Observaciones" contienen mucho texto, y si quieres ver el contenido tienes que estar ajustando el ancho o justificando el visualmente la hoja no queda muy bien.

2 respuestas

Respuesta
2

Entra al Editor de macros y selecciona con doble clic el objeto HOJA donde vayas a aplicar esto. Allí copia este código:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'x Elsamatilde
'ejecuta si la celda no está vacía y en fila2 = "Observaciones"
If Target.Value <> "" And Cells(2, Target.Column) = "Observaciones" Then
    MsgBox Target.Value
End If
End Sub

Sdos y no olvides valorar la respuesta.

Elsa

Respuesta
1

Probá el siguiente código (que deberás poner en la hoja en cuestión)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Cells(2, Target.Column).Value = "Observaciones" Then
   MsgBox Target.Value, vbInformation, "Información"
   Cancel = True
End If
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Paloma de verificación en celda excel

Me gustaría tener un código que al hacer doble clic sobre una celda me marque esa celda con una palomilla de las que salen el cuadro de verificación
1 respuesta

Asignar un valor a una celda de un rango con clic

Encontré la respuesta en otra pregunta que hizo otra persona pero yo quiero hacer los mismo pero definiendo solamente un rango de celdas a las cuales aplicar esta función. Por ejemplo yo quiero que se aplique esta función solamente al rando de celdas...
1 respuesta

Auto ejecutar una macro

Quiero que se autoejecute una macro que tengo en un libro pero no se como ya que soy muy novato, el nombre de la macro es Private Sub Worksheet_Change(ByVal Target As Range).
1 respuesta

Sumar valor en misma celda

Como lo hago para que al introducir un valor en una celda me sume automáticamente 25. Es decir que al poner 100 en una celda me de esta misma 125
1 respuesta

¿Cómo ejecutar una macro haciendo dobleclick en cualquier celda de la columna B?

¿Cómo puedo ejecutar una macro haciendo dobleclick en cualquier celda de la columna B? ¿Y cómo ejecutar la macro para que comienze desde la celda que haga dobleclick? He echo una macro la cual abre una plantilla de excel i copia los datos de...
1 respuesta

Macro lenta en la ejecución calculando celdas

Tengo esto en la hoja : Private Sub Worksheet_Activate() ActiveSheet.ScrollArea = "A1:Q6000" Call Celdas_oculta End Sub Private Sub Worksheet_Change(ByVal Target As Range) 'Por.Dante Amor If Target.Column = 4 Then If Cells(Target.Row, "B") = "" Then...
2 respuestas

Ejecutar macro al dar clic en una celda

No soy muy experto en programar todo con las macros, pero quiero saber como puedo dar clic en una celda que tiene como titulo "buscar" y así me ejecute la macro que cree con anterioridad.
1 respuesta

Redireccionar a otra hoja de Microsoft Excel tras clicar en una celda determinada

Necesito que al hacer doble clic en una celda, me dirija a otra celda situada en otra hoja. Seria como hacer clic sobre un link. Ej: A2= SEBASTIAN HOJA 1 B4=SEBASTINA HOJA 2 Necesito que al hacer clic en la celda A2 me dirija a la celda B4 situada en...
1 respuesta

Permitir solo determinado formato en celdas

Solicitando nuevamente te ayuda. Como podría hacer para que en una hoja de Excel llamada Datos, la columna A (Consecutivo) acepte solo números; la columna B (Descripción) acepte solo texto y por ultimo la columna C (Fecha) solo fechas. Ademas si al...
1 respuesta

Hacer click (o doble click) en una celda y que aparezca un valor "X"

Tengo una tabla donde cada casilla es un tipo de defecto ¿Como puedo hacer para que con un click o doble click sobre la celda correspondiente solo coloque la letra "X". En esta celda previamente tiene escrito un número. ¿ ?
2 respuestas