excel学习库-Excel VBA教程：单元格添加和删除批注

今天给大家分享如何通过Excel VBA来给单元格添加和删除批注。 1.单元格添加批注的VBA代码 Sub addCmt() '定义变量 Dim rng As Range, str As String '给批注内容变量赋值内容 str = "优秀" '设置变量rng为当前活动单元格 Set rng = ActiveCell '判断批注是否已经添加 If rng.Comment Is Nothing Then '没有添加批注则执行添加批注 rng.AddComment str '设置批注显示状态 rng.Comment.Visible = True End If Set rng = Nothing End Sub 2.插入按钮绑定宏addCmt并命名为“添加批注”

3.选择需要添加批注的单元格，点击【添加批注】按钮

批注被成功添加且为显示状态 4.单元格删除批注的VBA代码 Sub delCmt() '定义变量 Dim rng As Range '设置变量rng为当前活动单元格 Set rng = ActiveCell '判断单元格是否添加了批注 If Not rng.Comment Is Nothing Then '有批注则执行批注删除 rng.ClearComments End If Set rng = Nothing End Sub 5.插入按钮绑定宏delCmt并命名为“删除批注”

6.选择刚才添加批注的单元格，点击【删除批注】按钮

单元格批注被成功删除本次分享就到这里了，我们下次分享再见！ ~如果您喜欢的话，欢迎点赞+关注+留言哦，感谢您的支持！

一	二	三	四	五	六	日
						1
2	3	4	5	6	7	8
9	10	11	12	13	14	15
16	17	18	19	20	21	22
23	24	25	26	27	28	29
30	31

excel学习库

excel表格_excel函数公式大全_execl从入门到精通

Excel VBA教程：单元格添加和删除批注2024-04-12 02:14:41