Vzorec do komentáře

Následující kód vložte do Modulu ve VBA:

1) Spusťte Visual Basic - (Alt+F11) nebo Nástroje - Makro - Editor jazyka Visual Basic.

2) Vložte modul - Insert - Module

3) Vložte kód - do pravého okna vložte výše uvedený kód

Sub VlozVzorecDoKomentare()
Dim cell As Range
     On Error Resume Next
Selection.ClearComments
     On Error GoTo 0
     For Each cell In Intersect(Selection, ActiveSheet.UsedRange)
     If cell.Formula <> "" Then
         cell.AddComment
         cell.Comment.Visible = False
On Error Resume Next
     cell.Comment.Text Text:=cell.FormulaLocal
On Error GoTo 0
End If
Next cell
End Sub

Stačí spustit Makro a je hotovo - vzorec z dané buňky bude v komentáři...