跳到主要内容

如何在Excel中过滤带有注释的单元格?

我们通常在工作表中插入注释,以标记一些重要信息或细节。 但是,在某些情况下,我们只希望过滤包含注释的行并将它们放在一起以便于查看。 Excel中的“筛选器”功能无法用于我们直接解决此工作。 在本文中,您将学习如何在Excel中过滤带有注释的单元格。

通过创建助手列来过滤带有注释的单元格


箭头蓝色右气泡 通过创建助手列来过滤带有注释的单元格

要仅过滤注释行,可以使用以下命令标识注释单元格 用户定义功能 首先,然后应用 筛选器 功能。

1。 按住 Alt + F11键 键,然后打开 Microsoft Visual Basic for Applications窗口.

2. 点击 插页 > 模块,然后将以下宏粘贴到 模块窗口.

VBA代码:确定包含注释的单元格

Function HasComment(r As Range)
'Update 20140718
    Application.Volatile True
    HasComment = Not r.Comment Is Nothing
End Function

3。 然后保存代码并关闭 模块 窗口,然后返回工作表,输入此公式 =有评论(B2) 进入评论单元格旁边的空白单元格,(B2 包含您要使用的值),请参见屏幕截图:

文档过滤器评论 1

4。 然后将填充手柄拖到要应用此公式的范围单元格,您将获得 TRUE or FALSE 在牢房里 TRUE 代表具有评论和 FALSE 表示没有评论。

5。 确定注释单元格后,选择数据范围,然后单击 时间 > 筛选器,请参见屏幕截图:

文档过滤器评论 1

6。 然后单击帮助器列旁边的下拉箭头,检查 TRUE 仅选项,请参见屏幕截图:

文档过滤器评论 1

7。 并点击 OK 按钮,然后注释行被过滤掉,如下面的屏幕截图所示:

文档过滤器评论 1

8。 最后,您可以根据需要删除C列的内容。

最佳办公生产力工具

🤖 Kutools 人工智能助手:基于以下内容彻底改变数据分析: 智能执行   |  生成代码  |  创建自定义公式  |  分析数据并生成图表  |  调用 Kutools 函数...
热门特色: 查找、突出显示或识别重复项   |  删除空白行   |  合并列或单元格而不丢失数据   |   不使用公式进行四舍五入 ...
超级查询: 多条件VLookup    多值VLookup  |   跨多个工作表的 VLookup   |   模糊查询 ....
高级下拉列表: 快速创建下拉列表   |  依赖下拉列表   |  多选下拉列表 ....
列管理器: 添加特定数量的列  |  移动列  |  切换隐藏列的可见性状态  |  比较范围和列 ...
特色功能: 网格焦点   |  设计图   |   大方程式酒吧    工作簿和工作表管理器   |  资源库 (自动文本)   |  日期选择器   |  合并工作表   |  加密/解密单元格    按列表发送电子邮件   |  超级筛选   |   特殊过滤器 (过滤粗体/斜体/删除线...)...
前 15 个工具集12 文本 工具 (添加文本, 删除字符,...)   |   50+ 图表 类型 (甘特图,...)   |   40+ 实用 公式 (根据生日计算年龄,...)   |   19 插入 工具 (插入二维码, 从路径插入图片,...)   |   12 转化 工具 (小写金额转大写, 货币兑换,...)   |   7 合并与拆分 工具 (高级组合行, 分裂细胞,...)   |   ... 和更多

使用 Kutools for Excel 增强您的 Excel 技能,体验前所未有的效率。 Kutools for Excel 提供了 300 多种高级功能来提高生产力并节省时间。  单击此处获取您最需要的功能...

产品描述


Office Tab 为 Office 带来选项卡式界面,让您的工作更加轻松

  • 在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
  • 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
  • 每天将您的工作效率提高50%,并减少数百次鼠标单击!

 

Comments (10)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I am using Excel 365 and tried using Notes instead of Comments and I get #NAME?. When I try comments, I get all False. I confirmed that my cells have Comments and not Notes in the cells. What am I doing wrong?
This comment was minimized by the moderator on the site
Hello, Annie
In Excel 365, you can see the note is shown as below screenshot:
https://www.extendoffice.com/images/stories/comments/comment-skyyang/doc-comment-note-1.png

And the comment is shown as this:
https://www.extendoffice.com/images/stories/comments/comment-skyyang/doc-comment-note-2.png

So, if there are notes in your worksheet, you just use the code in this article and don't change any thing, then apply the formula you will get the correct results as below:
https://www.extendoffice.com/images/stories/comments/comment-skyyang/doc-comment-note-3.png

Please try, hope it can help you!
This comment was minimized by the moderator on the site
And how to do it with COMMENTS? Not NOTES.

Johnny
This comment was minimized by the moderator on the site
Me sale todo falso a que se debe
This comment was minimized by the moderator on the site
Hello Marcela,

Glad to help. May I know whether the Excel version you are using is Microsoft Excel 365, which can be different from other versions of Excel?

If it is Microsoft Excel 365, then I know what leads to the problem. In Microsoft Excel 365, Notes replaced the Comments in other versions of Excel. So change your comments to notes, then the returned values will be TRUEs. Please have a try. Looking forward to your reply.

Sincerely,
Mandy
This comment was minimized by the moderator on the site
Hi, so how to do it with COMMENTS? Without changing them to notes.

Thx,
johnny.
This comment was minimized by the moderator on the site
Maravilhoso!!!!!! Obrigado!!!!
This comment was minimized by the moderator on the site
Gracias por este aporte, muy recomendado esta página.
This comment was minimized by the moderator on the site
I would like to know how does the "HasComment = Not r.Comment Is Nothing" part works. Thanks!
This comment was minimized by the moderator on the site
Amazing solution to a problem. Loved it.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations