Bookmark and Share

Enter your email address:

Delivered by FeedBurner

Home Page

Subscribe here
Add to My Yahoo!
This page is powered by Blogger. Isn't yours?

Host your Web site with PureHost!

eXTReMe Tracker

  Thursday, July 03, 2008 – Permalink –

Show Formulas in Cell Comments

Display properties

Select the cells and then run this macro:

Sub CommentThem()
Dim cell As Range
On Error Resume Next
On Error GoTo 0
For Each cell In Intersect(Selection, ActiveSheet.UsedRange)
If cell.Formula <> "" Then
cell.Comment.Visible = False
On Error Resume Next 'fails on invalid formula
cell.Comment.Text Text:=" Address: " & cell.Address(0, 0) & Chr(10) & _
" Value: " & cell.Value & Chr(10) & _
" Format: " & cell.NumberFormat & Chr(10) & _
" Formula: " & cell.Formula
On Error GoTo 0
End If
Next cell

End Sub

Formulas in Comments

by David McRitchie

Show FORMULA of another cell in Excel

[Edited entry from 3/12/2005]

See all Topics


<Doug Klippert@ 5:10 AM

Comments: Post a Comment

Links to this post:

Create a Link