清冽之泉

宏计算工作薄中的注释数量: Revision history

View logs for this page

Diff selection: Mark the radio buttons of the revisions to compare and hit enter or the button at the bottom.
Legend: (cur) = difference with latest revision, (prev) = difference with preceding revision, m = minor edit.

29 September 2025

  • curprev 09:5009:50, 29 September 2025‎ Mwroot talk contribs‎ 1,133 bytes +1,133‎ Created page with "无权要求其改变工作习惯的同事，喜欢在单元格上用注释，要计算他搞了多少条注释，手动数是不切实际的，Kimi.ai 写一段宏解决了此问题。 <syntaxhighlight lang="VBScript" line> Sub CountCommentsInAllSheets() Dim wb As Workbook Dim ws As Worksheet Dim count As Integer Dim totalComments As Integer Set wb = ThisWorkbook count = 0 totalComments = 0 ' 遍历工作簿中的所有工作..."
Retrieved from "https://qingliezhiquan.com/blog/宏计算工作薄中的注释数量"