[VBA ] 雙面列印及文字取代問題
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，但是取代的部分卻沒有成功
請問是哪裡出問題了
感謝
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 36.225.122.119
※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1458731724.A.35C.html
推
03/23 22:00, , 1F
03/23 22:00, 1F
→
03/23 22:02, , 2F
03/23 22:02, 2F
→
03/23 22:03, , 3F
03/23 22:03, 3F
→
03/23 22:52, , 4F
03/23 22:52, 4F
→
03/23 22:52, , 5F
03/23 22:52, 5F
→
03/23 22:53, , 6F
03/23 22:53, 6F
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
