PTT
Submit
Submit
選擇語言
正體中文
简体中文
PTT
Visual_Basic
[VBA ] 雙面列印及文字取代問題
作者:
usanhuang
(呱呱)
2016-03-23 19:15:21
1. 公司的印表機有支援自動雙面列印的功能
因此想在一些文件上加上程式碼
但查了一下printout只有ManualDuplexPrint而不能自動雙面列印
請問各位前輩有其他方式能辦到嗎
2. 之前有自己寫Word取代功能的程式
With myDoc.Selection.Find
.Text = "123"
.Replacement.Text = "456"
.Wrap = wdFindContinue
.Execute Replace:=wdReplaceAll
End With
後來想將各項程式統合在excel來開啟
而寫了下面這段
Dim myWord As Object
Set myWord = CreateObject("Word.Application")
myWord.Visible = True
Set myDoc = myWord.Documents.Open("D:\xxx\test.docx").Content
myWord.Activate
With myDoc.Selection.Find
.Text = "123"
.Replacement.Text = "456"
.Wrap = wdFindContinue
.Execute Replace:=wdReplaceAll
End With
雖然成功打開word,但是取代的部分卻沒有成功
請問是哪裡出問題了
感謝
作者:
usanhuang
(呱呱)
2016-03-23 22:52:00
啊啊 對耶 我太執著於程式碼能順利執行了只要繞個彎就可以達到同樣效果非常感謝
作者: potawei (我要13億)
2016-03-23 22:00:00
我的做法是把EXCEL裡面要取代和被取代的字輸出成TXTWORD在範本裡面塞取代的巨集指令 用EXCEL開啟指定的WORD呼叫WORD的取代巨集去執行取代任務
繼續閱讀
[VBA ] 調整所有工作表顯示比例
sarcasm
[.NET] GridView+SqlDataSource的分頁問題
renmax
[VBA ] 如何抓相對路徑的資料
noworneverev
[VBA ] powerpoint vba
RABO
[VB6 ] 陣列統計的問題
conlich
[VBA ] 為什麼Find可以跑這麼快?
lazarus1121
[VBA ] 網路芳鄰連線問題
necsa
Re: [.NET] 有關於datagridview的問題
garyl62327
[.NET] 有關於datagridview的問題
newkoks
[.NET] 詢問有關SerialPort相關問題
ba2001
Links
booklink
Contact Us: admin [ a t ] ucptt.com