GBKEE

¦^´_ 3# yangjie
¬O³o¼Ë¶Ü?

1. Option Explicit
   
2. Sub Ex()
   
3.     With Workbooks.Open("D:\TEST.XLS")
   
4.         Application.WindowState = xlMaximized
   
5.         '*****
   
6.         '*****
   
7.         '*****
   
8.     End With
   
9. End Sub

½Æ»s¥N½X