VBA打开Excel却隐藏不显示工作薄的两种方法

2013-06-20 21:41 阅读 2,938 次 评论关闭

通过如下的两种代码,可以打开工作薄,但是却不显示工作薄,方法如下:

一、第一种代码

Set MyApp = New Application

Set MySourceBook = MyApp.Workbooks.Open("C:\MyBook1.xls", 0, True)

Set MySourceSheet = MySourceBook.Worksheets("Sheet1")

MySourceBook.Close False

二、第二种代码

Application.ScreenUpdating = False

Application.ShowWindowsInTaskbar = False

Set MySourceBook = Workbooks.Open("C:\MyBook1.xls", 0, True)

Set MySourceSheet = MySourceBook.Worksheets("Sheet1")

MySourceBook.Close False

Application.ShowWindowsInTaskbar = True

Application.ScreenUpdating = True

上面的两种代码,建议使用使用第二种方法,因为速度更快些。

版权声明:本文著作权归原作者所有,欢迎分享本文,谢谢支持!
转载请注明:VBA打开Excel却隐藏不显示工作薄的两种方法 | 猎微网

评论已关闭!