本示例显示活动工作表中第一个批注的作者。
MsgBox ActiveSheet.Comments.Item(1).Author