excel用自定义函数获取单元格注释

excel用自定义函数获取单元格注释

我们可以用一个自定义函数来提取单元格注释。方法如下：

1.按Alt+F11，打开VBA编辑器。

2.单击菜单“插入→模块”，在右边的代码窗口中输入代码：

Function GetCommentText(rCommentCell As Range)Dim strGotIt As StringOn Error Resume NextstrGotIt = WorksheetFunction.Clean(rCommentCell.Comment.Text)GetCommentText = strGotItOn Error GoTo 0End Function

3.关闭VBA编辑器。在单元格中输入公式：

=GetCommentText(B4)

将在当前单元格中返回B4单元格中的注释。

版权声明：本文内容由网络用户投稿，版权归原作者所有，本站不拥有其著作权，亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容，请联系我们jiasou666@gmail.com 处理，核实后本网站将在24小时内删除侵权内容。