12
返回列表 上一主題 發帖

[發問] 如何用BAT開啟 xlsm檔

劉大胃

帖子
63 
主題
8 
精華
0 
積分
122 
點名
0  
作業系統
Windows 2007 
軟體版本
Office 2007 
閱讀權限
20 
性別
男 
來自
Taiwan 
註冊時間
2019-4-16 
最後登錄
2023-3-24 
11# 跳轉到 »
發表於 2021-11-8 16:55 | 只看該作者
直接使用vbs即可, 它就是Windows版的Bat.
Thanks ~


==============================================
set sh=WScript.CreateObject("WScript.Shell")  

Dim objExcel                                                                                    '宣告Excel應用程式變數
Dim objWorkbook                                                                                 '宣告工作簿物件變數
Dim strSFLPath
Dim strSFFile

strSFLPath= "D:\"                                                                               'Excel路徑定義                                                        
strSFFile ="ABC.xlsm"                                                                           'Excel檔名

Set objExcel = CreateObject("Excel.Application")
objExcel.visible = True                                                                        '執行App時, 是否需要顯示該App.
Set objWorkbook = objExcel.Workbooks.Open (strSFLPath & strSFFile )                            '開啟Excel檔案.

objWorkbook.Application.Run "DailyMailSending"                                                 '執行巨集

objWorkbook.Saved = True                                                                       '不要儲存工作簿
objWorkbook.Close                                                                              '關閉工作簿
Set objWorkbook  = Nothing                                                                     '釋放工作簿物件
objExcel.Quit                                                                                  '關閉Excel
Set objExcel= Nothing                                                                          '釋放Excel物件

objFile.Close

WScript.Quit
新手上路，請多包涵。

TOP

        靜思自在 : 滴水成河。粒米成蘿，勿輕己靈，勿以善小而不為。
12
返回列表 上一主題