Excel通过按钮实现一键添加/删除批注技巧
经由过程VBA实现点击按钮添加批注和删除批注的功能，具体的操作流程就看下文。
工具/原料
- Excel（教程以Excel2013为例，此法同样合用于Excel其他版本）
方式/步骤
- 1
新建一个Excel文档，后缀名为.xlsx，然后另存为 Excel启用宏的工作簿，后缀名为.xlsm。
- 2
绘制操控按钮，本教程是经由过程插入外形，设置其格局来实现的。
- 3
进入VBA窗口，不清晰的可以参考以下链接；
- 4
新建模块以便放置代码，在菜单栏”插入“项中选择”模块“。
- 5
再模块中，输入代码：
Sub pizhu() ’添加批注
Dim rng As Range
Set rng = Selection
i = rng.Row
j = rng.Column
With Sheet1.Cells(i, j).AddComment
.Visible = True
.Text " "
End With
End Sub
Sub shanchu() ‘删除批注
On Error Resume Next
Selection.Comment.Shape.Select True
Selection.Delete
End Sub
- 6
给两个按钮别离指定分歧的宏，具体操作如图所示：
1.”添加批注“按钮指定pingzhu；
2.”删除批注“按钮指定shanchu。
- 7
回到Excel窗口，肆意选择单位格，单击”添加批注“按钮即可添加批注。
- 8
选择已有批注的单位格，点击”删除批注“按钮即可删除批注。
PS：或选中批注，点击Delete键删除亦可。
注重事项
- 若是对您有点帮忙，请撑持一下，感谢！
- 发表于 2018-03-23 00:00
- 阅读 ( 276 )
- 分类：其他类型
