Añadir el resultado de una fórmula a un comentario con VBA

Una forma de añadir el resultado de una fórmula a un comentario en Excel es con código VBA.

Si nos encontramos por ejemplo valores en varias celdas, en este caso en A6:A8 y queremos que el cometario de la celda A2 muestre el resultado podemos hacerlo con el siguiente código.

Sub FormulaToComment()
Dim vResult As Long

vResult = Application.Sum(Range(Cells(6, 1), Cells(8, 1)))

With Worksheets(1).Range(“A2”).AddComment
.Visible = True
.Text “El resultado de la fórmula Suma(A6:A8) es: ” & vResult

End With

End Sub

Formula en comentarioEste código es necesario ejecutarlo al encontrarse dentro de un Módulo, si quieres que se ejecute automáticamente al hacer clic en la hoja debes añadirlo dentro de ésta.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim vResult As Long

    vResult = Application.Sum(Range(Cells(6, 1), Cells(8, 1)))
   
    Worksheets(1).Range(“A2”).ClearComments
      
    With Worksheets(1).Range(“A2”).AddComment
        .Visible = True
        .Text “El resultado de la fórmula Suma(A6:A8) es: ” & vResult
        
    End With

End Sub

Formula en comentario ExcelTrucos

“Recuerda, este código es sólo un ejemplo de cómo se podría resolver esta necesidad”

Anuncios

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s