利用禁用屏幕刷新即可,即在程序开头加上一句代码:差悉Application.ScreenUpdating=False程序结尾前加上Application.ScreenUpdating=True关于此例中用到的ScreenUpdating属性的相关知识:如虚腊乎果屏幕更新功能是打开的,则该值为True。Boolean类型,可读写。说明:关闭屏幕更新可加快宏的执行速度。这样将看不到宏的执行过程,但宏的执行速度加快了。当宏结束运行后,请记住将ScreenUpdating属性设回到True。 *** 作说明:当为True时,局茄屏幕上会显示每个单元格数值的变化情况;当为False时,屏幕上只会等运算完成后,才显示结果。Private Sub Worksheet_Change(ByVal Target As Range)
野桥 If Target.Address = "$A$1" Or Target.Address = "$A$2" Then
评论列表(0条)