ScreenUpdating
application.screenupdating = false
此时此刻,执行的过程不再显示出来
application.screenupdating = true
此时此刻,执行的每一过程都被显示出来
sheet.delete 和 displayalerts
application.displayalerts = false
不显示警告信息了
enableevents
sub worksheet_selectionchange(byval target as range)
意思是单元格被选中时,触发事件
end sub
在运行过程中,一旦遇到这个语句,事件过程即可停止,但是代码依然运行
worksheetfunction
application.worksheetfunction.countif(range(A1:A10),">1000")
可以直接调用excel里面的函数