comment
cell addresses being printed?
If you pick the Print at End option then you have no control over how Excel
prints. If you don't want to print comments "as they appear" you might want
to use a macro to list all your comments in a worksheet.
Sub ListComments()
Dim ListSheet As Worksheet, CurrSheet As Worksheet
Dim Cell As Range, Counter As Integer
On Error GoTo NoNotes
Set CurrSheet = ActiveSheet
Set ListSheet = Worksheets.Add
ListSheet.Range("A1").Value = ActiveWorkbook.Name & " " &
ActiveSheet.Name
Counter = 1
For Each Cell In CurrSheet.Cells.SpecialCells(xlCellTypeComments)
Counter = Counter + 1
With ListSheet
'.Cells(Counter, 1).Value = Cell.Address
.Cells(Counter, 2).Value = Cell.Comment.Text
End With
Next
Exit Sub
NoNotes:
MsgBox "No cellnotes on this sheet"
End Sub
