標題: WORD 2003 VBA 另存新檔的 BUG? [打印本頁]

---

作者: eigen    時間: 2024-3-28 17:08     標題: WORD 2003 VBA 另存新檔的 BUG?

這是 WORD 2003 寫的 VBA

CTRL +p 列印時，執行 VBA巨集

抓取 時間、第一行、第二行、表格(2,2) 的內容

組成新的檔名 20240328_121004_APPLE_某公司_詢價單.doc

但存檔畫面，始終只有 20240328_121004_APPLE

[attach]37638[/attach]
[attach]37639[/attach]

但在 VBA 的除錯畫面，filename 上顯示的卻是正常的

有在別台電腦試過了，一樣的情況，請問有人知道是什麼原因？


二、我試過 produc vender table 排列組合（六種），只有兩種情況是正常


filename = Format(Now, "YYYYMMDD_HHMMSS") & Product & Vendor & Table 20240328_122943_APPLE
filename = Format(Now, "YYYYMMDD_HHMMSS") & Product & Table & Vendor 20240328_123002_APPLE

filename = Format(Now, "YYYYMMDD_HHMMSS") & Vendor & Table & Product 20240328_123015_某公司_詢價單_APPLE
filename = Format(Now, "YYYYMMDD_HHMMSS") & Table & Vendor & Product 20240328_123224_詢價單_某公司_APPLE

filename = Format(Now, "YYYYMMDD_HHMMSS") & Vendor & Product & Table 20240328_123858_某公司_APPLE
filename = Format(Now, "YYYYMMDD_HHMMSS") & Table & Product & Vendor 20240328_123927_詢價單_APPLE


[attach]37640[/attach]

---

作者: linyancheng    時間: 2024-4-28 22:32

回復 1# eigen


   加上這行代碼應該就能解決您的問題！

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)