Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

How to Create Excel Footnotes?

0 views
Skip to first unread message

Terence Kiernan

unread,
Sep 13, 2002, 9:41:55 AM9/13/02
to
In an Excel cell, what's the best way to footnote or
endnote the entry (be it numbers or text)? Using
the "Comment" feature doesn't work because, for example,
printing Comments as endnotes includes the name of the
comment writer. Signed, An Infrequent Excel User

Dave Peterson

unread,
Sep 13, 2002, 6:07:08 PM9/13/02
to
Excel doesn't support footnote/endnotes the way Word does.

About the closest way you can do is by using the comments and then printing
them via File|Page Setup|Sheet Tab|Comments option

Or maybe using cells at the bottom of your data and formatting them as
endnotes. (Footnotes at the bottom of the page might change too much with data
inserted/deleted.)

If you decide that you can live with this, but don't want the comments to have
the author's name, maybe a macro that would strip the name (plus the colon) from
the comment might work for you.

If you must keep the author's name, maybe a macro that would put the comment at
the end of the used range (and strip the author's name.

Option Explicit
Sub testme2()

Dim myComment As Comment
Dim LastRow As Long
Dim posColon As Long

With ActiveSheet
.UsedRange 'try to reset used range
LastRow = .UsedRange.Rows(.UsedRange.Rows.Count).Row + 1
For Each myComment In .Comments
posColon = InStr(1, myComment.Text, ":")
If posColon > 0 Then
.Cells(LastRow, "A").Value = _
Right(myComment.Text, Len(myComment.Text) - posColon - 1)
LastRow = LastRow + 1
End If
Next myComment
End With

End Sub

The macro elimates everything upto and including the first colon (:). It also
thows away the next character (linefeed).

If you need a tutorial on getting started with macros, you can read David
McRitchie's notes at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

--

Dave Peterson
ec3...@msn.com

0 new messages