Worksheet.PrintedCommentPages (Excel)

Returns the number of comment pages that will be printed for the current worksheet.

The PrintedCommentPages property only returns a number greater than zero if the Comments setting on the Sheet tab of the Page Setup dialog box is set to At end of sheet. This property returns zero if the sheet is a Chart sheet or an MS Excel 5.0 Dialog sheet.

Dim lngPrintedCommentPages As Long
lngPrintedCommentPages = ActiveSheet.PrintedCommentPages