經由過程VBA實現點擊按鈕添加批注和刪除批注的功能,具體的操作流程就看下文。
新建一個Excel文檔,后綴名為.xlsx,然后另存為 Excel啟用宏的工作簿,后綴名為.xlsm。
繪制操控按鈕,本教程是經由過程插入外形,設置其格局來實現的。
進入VBA窗口,不清晰的可以參考以下鏈接;
10打開的三種方式
新建模塊以便放置代碼,在菜單欄”插入“項中選擇”模塊“。
再模塊中,輸入代碼:
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
給兩個按鈕別離指心猿意馬分歧的宏,具體操作如圖所示:
1.”添加批注“按鈕指心猿意馬pingzhu;
2.”刪除批注“按鈕指心猿意馬shanchu。
回到Excel窗口,肆意選擇單位格,單擊”添加批注“按鈕即可添加批注。
選擇已有批注的單位格,點擊”刪除批注“按鈕即可刪除批注。
PS:或選中批注,點擊Delete鍵刪除亦可。
0 篇文章
如果覺得我的文章對您有用,請隨意打賞。你的支持將鼓勵我繼續創作!