前景提要
昨天我們也是學(xué)習(xí)了如何用Excel VBA的方式批量給單元格增加批注,通過這個方法,我們能夠在短時間之內(nèi)快速實現(xiàn)對單元格增加批注,并且非常的靈活,可以按照指定單元格內(nèi)容增加批注,也可以搭配一些自己想要輸入的固定搭配,相對于傳統(tǒng)的右鍵一個個的拆入批注,確實是高效了很多。
那么既然成功的批量增加了那么多批注,是否可以相應(yīng)的批量刪除這些單元格的批注呢?畢竟批注,有時候并不對外展示的
既然學(xué)會了批量增加單元格的批注,那么批量刪除單元格的批注,不是應(yīng)該手到擒來的嘛?
場景說明
這是我們上節(jié)的作品,成功的給所有的單元格增加了批注,今天我們來嘗試下刪除單元的批注,還是利用這個現(xiàn)成的數(shù)據(jù)源
代碼區(qū)
Sub depizhu()
Dim rng As Range, a As Range
Set rng = Application.InputBox("請選擇單元格區(qū)域", "需要刪除批注的單元格區(qū)域", , , , , , 8)
For Each a In rng
a.ClearComments
Next a
End Sub
代碼干凈利落的將所選的單元格區(qū)域內(nèi)的批注,都全部刪除了
這里有小伙伴們可能會想,之前增加單元格批注的時候,我們需要首先判斷單元格是否存在批注
那么現(xiàn)在刪除單元格批注,是不是也需要判斷一次呢?(很明顯我的代碼中沒有判斷)
我們來實際操作下,看看是否需要判斷。
從上面的動圖中可以看到,我們先手動刪除了幾個批注之后,然后我們再次利用我們的代碼執(zhí)行刪除批注的操作
代碼很成功,并沒有任何的報錯,而且也成功的刪除了批注
這說明,刪除批注這個功能,我們是不需要先判斷單元格中是否存在批注的
代碼解析
今天的代碼解析,就非常的簡單了。
單元格的批注的刪除,如何實現(xiàn)
a.ClearComments
so easy 是不是!
聯(lián)系客服