小弟用excel vba 寫巨集時使用迴圈消除所有圖形物件:
for kkk = 1 to 100 step 1
ActiveSheet.Shapes("object " & kkk).Select
Selection.Cut
next
每次只要是圖形物件不存在就會發生錯誤、請問我該下何種語法才能防止錯誤訊息出現?然後又可以將工作頁上所有物件清除?
for kkk = 1 to 100 step 1
ActiveSheet.Shapes("object " & kkk).Select
Selection.Cut
next
每次只要是圖形物件不存在就會發生錯誤、請問我該下何種語法才能防止錯誤訊息出現?然後又可以將工作頁上所有物件清除?
文章標籤
全站熱搜

只要用ActiveSheet.Shapes.delete即可。錄製巨集因為都是現用的工作表,所以常用Select,但是必須注意Select的用法,每個活頁簿中都有ActiveSheet,而用Select前提必須工作表在Activate,除非你已將活頁簿Activate,否則容易出錯,盡量不要用Select。