關於ｖｂｓ啟用ｘｌｓｍ檔案格式問題？ - Excel程式區

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

1^# 跳轉到 »

發表於 2012-6-20 07:30 | 顯示全部帖子

回復 1# HUNGCHILIN
大大請測試看看！

使用 VBS檔啟用EXCEL中的巨集.rar (19 KB)

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

2^#

發表於 2012-6-21 10:37 | 顯示全部帖子

回復 3# HUNGCHILIN
請教一個技術上的問題，您是怎麼壓成 .EXE 檔的，應該不是 -> 轉換壓縮檔成自解檔吧？
我觀察這隻 .exe 是先去呼叫 .vbs 然後才去啟動 .xlsm 的。
如果是一般的轉換壓縮檔成自解檔，它只是單純地解壓而已，並不會自動去啟動 .vbs 的。
難道是直接由 VB 平台轉換成 .exe 的？因為我沒安裝 VB，請問那要如何處理？
敬請指教！

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

3^#

發表於 2012-6-22 08:26 | 顯示全部帖子

回復 5# HUNGCHILIN
不好意思，看遍了所有文章，也試著去產生它 (exe)，都失敗了！ (滑鼠點在 aaaXLSM.vbs 上，按滑鼠右鍵彈出小視窗，
選擇"添加到壓縮文件"，揀選 "建立自我解壓縮檔"，然後選擇 "進階設定" -> "自解檔選項(X)" -> "文字及圖示" ???)
我指的是 aaaXLSM.rar 裏頭的 aaaXLSM.exe。
能否就以現有的 aaaXLSM.vbs、aaaXLSM.xlsm，它產生的 aaaXLSM.exe 的程序指導一下？

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

4^#

發表於 2012-6-23 06:05 | 顯示全部帖子

本帖最後由 c_c_lai 於 2012-6-23 07:19 編輯

回復 7# HUNGCHILIN
原來如此！我少了"解壓後之執行"步驟，難怪每次均只有解壓而無執行之動作。
萬分謝謝您的指導！
附上成果！
股票圖表與拉霸.vbs：

Dim oExcel,fn
fn=Replace(WScript.ScriptFullName,Right(WScript.ScriptFullName,4),".xls")
Set oExcel = CreateObject("Excel.Application")
oExcel.Visible=True
oExcel.Workbooks.Open fn
Set oExcel = Nothing
Wscript.Quit

複製代碼

股票圖表與拉霸.rar (203.24 KB)