Note: The other languages of the website are Google-translated. Back to English

如何在Excel中将注释转换为单元格内容?

假设我在工作表中有一个充满注释的范围单元格,现在,我想将所有注释都转换为单元格内容,以便可以整齐而完整地打印它们。 有什么好的方法可以解决这个任务?

使用用户定义的功能将注释转换为单元格内容

使用VBA代码将注释转换为单元格内容

使用Kutools for Excel将注释转换为单元格内容

Office选项卡在Office中启用选项卡式编辑和浏览,并使您的工作更加轻松...
Kutools for Excel解决了您的大多数问题,并使您的生产率提高了80%
  • 重用任何东西: 将最常用或最复杂的公式,图表等添加到您的收藏夹中,并在将来快速重用它们。
  • 超过20种文字功能: 从文本字符串中提取数字; 提取或删除部分文字; 将数字和货币转换为英文单词。
  • 合并工具:将多个工作簿和工作表合二为一; 合并多个单元格/行/列,而不会丢失数据; 合并重复的行和总和。
  • 分割工具:根据价值将数据分割成多个工作表; 一本工作簿可转换为多个Excel,PDF或CSV文件; 一列到多列。
  • 跳过粘贴 隐藏/过滤的行; 计数与求和 按背景色; 向多个收件人批量发送个性化电子邮件。
  • 超级过滤器: 创建高级过滤方案并应用于任何工作表; 排序 按星期,日期,频率等 筛选器 用粗体,公式,注释...
  • 超过300种强大的功能; 适用于Office 2007-2019和365; 支持所有语言; 在您的企业或组织中轻松部署。

箭头蓝色右气泡 使用用户定义的功能将注释转换为单元格内容


通过使用此方法,您需要首先创建一个定义的函数,然后应用定义的公式将注释转换为单元格内容。 您可以按照以下步骤完成它:

1点击 开发商 > Visual Basic中,一个新的 适用于应用程序的Microsoft Visual Basic 将显示一个窗口,单击 插页 > 模块,然后将以下函数输入到模块中:

函数GetComments(pRng作为范围)作为字符串'Updateby20140509如果pRng.Comment不存在,则GetComments = pRng.Comment.Text如果结束,则结束函数

2.新闻 按Ctrl + S 保存功能。

3然后输入以下公式“= GetComments(A1)在任何空白单元格中,在这种情况下,我将使用单元格E1。 看截图:

文档注释到单元格1

4。 按 输入 键。 并选择单元格E1,然后将填充手柄拖到要包含此公式的单元格范围内。 并且所有注释都转换为单元格内容。 看截图:

文档注释到单元格2


箭头蓝色右气泡 使用VBA代码将注释转换为单元格内容

如果您知道VBA代码,则以下简短代码也可以帮助您将注释转换为单元格内容。

1。 选择要转换为单元格内容的范围;

2。 点击 开发商 > Visual Basic中,一个新的 适用于应用程序的Microsoft Visual Basic 将显示一个窗口,单击 插页 > 模块,然后将以下代码输入到模块中:

Sub CommentToCell()
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Rng.Value = Rng.NoteText
Next
End Sub

3。 然后点击  doc-multiply-calculation-3 按钮运行代码。 并选择要转换的范围,然后单击 OK,并且所有选定的注释都已转换为其相关单元格中的单元格内容。


文档注释到单元格3 -2 文档注释到单元格4

备注:如果您不想评论,则可以将其删除。


箭头蓝色右气泡 使用Kutools for Excel将注释转换为单元格内容

Kutools for Excel :具有300多个方便的Excel加载项,可以在30天内免费试用,没有任何限制。立即获取 .

XNUMXD压花不锈钢板 转换评论和单元格 of Kutools for Excel 是一个方便实用的工具,可以帮助您解决有关注释的许多问题。

安装后 Kutools for Excel,请执行以下操作:

1。 选择您要将注释导入单元格中的范围。

2。 点击 库工具 > 更多 > 转换评论和单元格,请参见屏幕截图:

doc-comments-to-cells-5

3。 在 转换评论和单元格 对话框中选择 将评论转换为单元格内容。 看截图:

doc-comments-to-cells-6

4。 然后点击 OK。 现在,所有选定的注释都将转换为其原始范围内的单元格内容。

有关更多详细信息 转换评论和单元格,请访问: 转换注释和单元格功能描述.


相关文章:


最佳办公效率工具

Kutools for Excel解决了您的大多数问题,并使您的生产率提高了80%

  • 重用: 快速插入 复杂的公式,图表 以及您以前使用过的任何东西; 加密单元 带密码 创建邮件列表 并发送电子邮件...
  • 超级公式栏 (轻松编辑多行文本和公式); 阅读版式 (轻松读取和编辑大量单元格); 粘贴到过滤范围...
  • 合并单元格/行/列 不会丢失数据; 拆分单元格内容; 合并重复的行/列...防止细胞重复; 比较范围...
  • 选择重复或唯一 行; 选择空白行 (所有单元格都是空的); 超级查找和模糊查找 在许多工作簿中; 随机选择...
  • 确切的副本 多个单元格,无需更改公式参考; 自动创建参考 到多张纸; 插入项目符号,复选框等...
  • 提取文字,添加文本,按位置删除, 删除空间; 创建和打印分页小计; 在单元格内容和注释之间转换...
  • 超级滤镜 (将过滤方案保存并应用于其他工作表); 高级排序 按月/周/日,频率及更多; 特殊过滤器 用粗体,斜体...
  • 结合工作簿和工作表; 根据关键列合并表; 将数据分割成多个工作表; 批量转换xls,xlsx和PDF...
  • 超过300种强大功能。 支持Office / Excel 2007-2019和365。支持所有语言。 在您的企业或组织中轻松部署。 完整功能30天免费试用。 60天退款保证。
kte选项卡201905

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

  • 在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
  • 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
  • 每天将您的工作效率提高50%,并减少数百次鼠标单击!
officetab底部
按评论排序
注释 (24)
还没有评分。 成为第一位评论!
该评论由网站上的主持人最小化
我还没有尝试过,但它似乎完全符合我的需要。 谢谢
该评论由网站上的主持人最小化
天哪,你是救世主!!!! 谢谢你。
该评论由网站上的主持人最小化
效果很好,多么好的解决方案! 谢谢。
该评论由网站上的主持人最小化
“使用用户定义的功能将评论转换为单元格内容”起初这很有效,我保存了工作簿并关闭了它。 下次我打开工作簿时,以前正确显示单元格注释的每个单元格现在都显示#NAME? 错误! 如何防止这种情况?
该评论由网站上的主持人最小化
起初工作,但后来返回一个#NAME? 错误。
该评论由网站上的主持人最小化
我一直认为我对 Excel 了解最多。 但我从来不知道您可以编写和使用用户定义的函数,就好像它们是 Excel 原生的一样。 谢谢你给我今天的课。
该评论由网站上的主持人最小化
嗨,当我运行上面的代码“Convert...VBA 代码”时,我得到了一个奇怪的结果。 对于每个具有注释文本(即公式)的单元格范围(B2:N2),当 ode 运行时,它仅适用于 ColB、ColD、ColF、ColH、ColJ、ColL、ColN - 每隔一列! 如果我只为 ColB 运行它,它就可以工作。 但如果我为 ColC 运行它,它不会。 注意:公式几乎相同。 该单元格根本没有评论中的值/字符串(所以我不认为这是一个公式问题。同样适用于所有其他列。如果它在该范围内工作,它会自行工作,如果没有,则不会。有什么建议吗?在发布之前,我想我会尝试一个新的工作簿作为测试。在 A1 中输入了一个公式“=ROW()+COLUMN()”。填充到范围 C3。运行此代码:Public Sub CellFormulaToCellComment() '作者:Darren R.... 05 年 2014 月 4 日'将单元格公式复制到单元格注释中'注意:将删除所有现有注释,因此请小心 Dim CellInRange As Range Dim CellComment As String For Each CellInRange In Selection If CellInRange .HasFormula Then CellComment = CellInRange.Formula CellInRange.ClearComments CellInRange.AddComment (CellComment) End If Next End Sub 将公式复制到每个单元格的注释中。将 PasteSpecial 注释复制到 D6:FXNUMX。现在有带有注释的空单元格 然后运行“CommentToCell” sub 并且它在每个单元格中都有效。所以现在我真的很难过。此外,我 f 发现有关 NoteText 的一些信息已过时并替换为 Cell.Comment 但换出命令不起作用,我不确定如何将其全部更改为工作任何想法将不胜感激。 谢谢,达伦
该评论由网站上的主持人最小化
你太棒了,非常感谢,非常感谢
该评论由网站上的主持人最小化
似乎不起作用。 我在 Windows 2013 上使用 Office 7。我得到 #Name ? 关于我应该做什么的任何线索? 我是否必须更改 Office 2013 版 Excel 的任何代码元素? 谢谢
该评论由网站上的主持人最小化
你好! 太棒了,非常感谢你的这篇文章! 它帮助我节省了一天! :) 谢谢!
该评论由网站上的主持人最小化
干得好,非常感谢
该评论由网站上的主持人最小化
1400 条单元格评论只用了几分钟。 哇! 谢谢你。
该评论由网站上的主持人最小化
它的工作:) 谢谢! 做得好
该评论由网站上的主持人最小化
你好。 我试过这段代码,它工作正常。 但是我有一个小问题:我可以将这段代码与 VLOOKUP 结合使用吗? 我试过了,但我什么也没得到。 如果你能帮助我,我将不胜感激。 我是巴西人。 如果我写错了,我道歉。 谢谢!
该评论由网站上的主持人最小化
你是我的英雄!!!!!!!!!!!!!!!!!!!!!! 谢谢你,谢谢你,谢谢你
该评论由网站上的主持人最小化
当我更改评论时,它不会自动更新。 我该如何改变? 谢谢
该评论由网站上的主持人最小化
这里同样的问题。 更改注释不会触发计算。 强制计算 (F9) 不起作用。 保存和加载文件不起作用。 但是,更改单元格内容将触发计算。
该评论由网站上的主持人最小化
你是明星!!! 谢谢
该评论由网站上的主持人最小化
完美的! 谢谢你
该评论由网站上的主持人最小化
很棒的提示,谢谢分享!
该评论由网站上的主持人最小化
有没有办法在没有评论标题或非粗体字的情况下做到这一点?
这里还没有评论
加载更多
留下你的意见
以访客身份发帖
×
评价此帖子:
0   产品特性
建议地点