Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 21
Default Ah, I think...

Hmm, the statement

Application.WindowState = xlMinimized

did not result in all windows getting minimized. The
following does minimize all Excel workbook windows. But I
still do not know if it speeds things up.

Dim wkb As Workbook
Dim OldDispAlerts As Boolean
Dim w As Window

OldDispAlerts = Application.DisplayAlerts
Application.DisplayAlerts = False
For Each w In Application.Windows
w.WindowState = xlMinimized
Next w
For Each wkb In Workbooks
If Not (wkb Is ThisWorkbook) Then
wkb.Close SaveChanges:=False
End If
Next wkb
Application.DisplayAlerts = OldDispAlerts

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On



All times are GMT +1. The time now is 09:14 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"