你好，我想想了解一下

把这个代码复制过去,按你的实际修改下,sheet名称,运行一下宏就可以了Sub ExtractCom()j = Sheets(1)ments.CountFor I = 1 To jSheets(1).Cells(I, 1) = Sheets(1)ments(I).TextNextEnd Sub 原问题：《你好,我想了解一下关于excel表格中如何把批注复制到单元格中。 补充:最好有示例》