How do you "select all comments" in a worksheet or workbook? Does anyone
have the VBA code for this?

Pam

Do you mean select all the cells that have comments in them?

if yes,

Option Explicit
Sub testme02()
Dim myRng As Range

With ActiveSheet
Set myRng = Nothing
On Error Resume Next
Set myRng = .Cells.SpecialCells(xlCellTypeComments)
On Error GoTo 0

If myRng Is Nothing Then
MsgBox "No cells with comments"
Else
myRng.Select
End If
End With
End Sub

Manually, you can select a single cell
edit|goto|special|check comments and click ok.

Pamela wrote:

How do you "select all comments" in a worksheet or workbook? Does anyone
have the VBA code for this?

Pam

--

Dave Peterson