EXCEL如何统计批注中的指定内容

写了一段VBA代码，你可以alt+F11打开VBA编辑器，插入-模块，把下面的代码复制到里面，

然后在EXCEL表格L1 中输入公式=sumnotes(A1:J13,"K")，其中K表示关键字：

Public Function SumNotes(rr As Range, strKey As String) As Single

Dim c As Range

Dim str1 As String, str2 As String

Dim str() As String

For Each c In rr

    If Not cComment Is Nothing Then

        str = Split(cCommentText, " ")

        If UBound(str) >= 1 Then

            str1 = str(0)

            str2 = str(1)

            If str1 = strKey Then

                SumNotes = SumNotes + Val(str2)

            End If

        End If

    End If

Next

End Function

比如批注在D5单元格,取批注第一行可用下面的代码:

Split(Range("D5")CommentText, Chr(10))(0)

后面(0)借到第一行,(1)为第二行以此类推

回答： 不是想让批注显示，而是想提取批注中的信息吗 追问： 对，就是把批注中的内容批量复制到文本中 回答： 这样可能比较麻烦，我想问，批注是怎样产生的，可不可以不用批注呢 追问： 批注是陆续添加的，现在有几万条了，需要一次性把批注全部复制到文本中。 回答： 采用别人方式或许会简单一点，批注上都添加些什么信息呢 晴天 的感言： 谢谢了，你和我的理解不一样，我再想办法吧。

兄弟，做个自定义函数。

Public

Function

Pz(x

As

Range)

Pz

=

xCellsCommentText

End

Function

然后，在EXCEL中输入

=Pz(A1)

就返回A1的批注内容了，当然其它单元格也可以，任何的，只要不是它本身

如果用GETCELL宏表函数也可以,只是用起来比较麻烦我觉得

提取Excel公式结果内数值的方法：

所需材料：Excel。

一、首先鼠标右键点击公式结果单元格，菜单内点击复制。

二、然后点击粘贴目标单元格，接着点击开始选项下的粘贴。

三、下拉菜单内点击“选择性粘贴”选项。

四、打开选择性粘贴窗口后，勾选“数值”，点击确定。

五、这样就可以把公式结果栏内的数值复制至指定单元格。

以上就是关于EXCEL如何统计批注中的指定内容全部的内容，包括:EXCEL如何统计批注中的指定内容、EXCEL取批注如何按照行数，分别取出批注的第一行第二行文本、怎么能把excel中的批注批量显示或导出来等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！