下列為開啟C:\TEMP目錄內所有主檔名為BOOK開頭的.XLS檔: Sub 按鈕1_Click() Dim mFile As String mFile = Dir(“C:\TEMP\BOOK*.XLS”) Do While mFile “” Workbooks.
確定! 回上一頁