如何通过设置Excel行距提升工作表可读性和美观度
1486
2022-10-07
让执行VBA过程时屏幕不出现闪烁现象
本文为《别怕,Excel VBA其实很简单(第3版)》随书问题参-
要解决本列的问题,可以在过程中设置Application对象的ScreenUpdating 属性为alse,将过程改写为:
Sub 将工作表另存为工作簿() Application.ScreenUpdating = False Dim Sht As Worksheet For Each Sht In Worksheets Sht.Copy ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & Sht.Name & ".xlsx" ActiveWorkbook.Close Next Sht Application.ScreenUpdating = TrueEnd Sub
版权声明:本文内容由网络用户投稿,版权归原作者所有,本站不拥有其著作权,亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容,请联系我们jiasou666@gmail.com 处理,核实后本网站将在24小时内删除侵权内容。