Excel: How to add a formula to a comment

Nu de multe ori avem nevoie de a folosi formule in comentariile Excel.

Dar, daca avem cu adevarat nevoie de a afisa un comentariu bazandu-ne pe o formula, atunci singura metoda este sa utilizam un macro.

Exemplu de problema:

Avem o listă de echipamente și o dată de achiziție. Dorim ca în celula cu data să ni se afișeze mesaj cu numărul de zile trecut de la achiziție.

Pentru acest lucru trebuie să stabilim întâi un comentariu vid pentru E3 și E4 apoi creăm următorul macro:

Sub DateCmnt()
'
' DateCmnt Macro
' Show a comment to a cell using a calculated value.
'
' Keyboard Shortcut: Ctrl+q
'
    Dim Res1 As Double
    Res1 = (Range("A7").Value - Range("E3").Value)
    Range("E3").Comment.Text Text:="Au trecut: " & Res1 & " zile de la achizitie"
    
    Res1 = (Range("A7").Value - Range("E4").Value)
    Range("E4").Comment.Text Text:="Au trecut: " & Res1 & " zile de la achizitie"

Range("E4").Comment.Shape.Fill.UserPicture ("P:\Avatar2.jpg")
    Range("E3").Select
  
End Sub

Res1 este variabila în care se stochează diferența de zile dintre data achizției și data curentă stocată în A7.

În momentul apăsării combinației de comenzi Ctrl+q se actualizează comentariul cu valoarea formulei.

Dacă doriți să adăugați o imagine pe un comentariu… sau un grafic, sau un shape acest lucru se poate realiza cu instrucțiunea din VBA:

 Range("E4").Comment.Shape.Fill.UserPicture ("P:\Avatar2.jpg")

Sper să vă fie util.

 

Acest articol este republicat și adaptat pe un exemplu economic.