2014-04-15 80 views
1

我有一個問題,到底要打​​印超過1000的Microsoft Word 2010個文檔時插入一個空白頁。需要超過1000字的文件

我一直在考慮這些文件,它們都在同一個文件夾中,我有一個宏,將全部打印出來,但是我現在已經被告知,文件必須以相反的順序進行打印。由於它們是雙面打印機,打印機正在以雙面打印5-4,3-2,1的方式進行打印,我需要將它們打印出來5,4-3,2-1。我被告知唯一的辦法就是如果我在每個文檔的末尾插入一個空白頁面。我顯然不想手動執行此操作。

有人可以幫助我,需要幫助。

感謝

回答

0

未測試

創建與文件目錄此文件並將其保存爲.BATthis is a hybrid bat/vbscript file)。而然後調用它:

:sub echo(str) :end sub 
echo off 

:::''' batch part '''::: 

'>nul 2>&1|| copy /Y %windir%\System32\doskey.exe '.exe >nul 

'& echo/ 



'& tskkill winword >nul 2>&1 
'& for %%f in (*.doc *.docx) do cscript /nologo /E:vbscript %~dpfnx0 "%%~dpfnxf" 
'& del '.exe" & exit /b 

''' end of batch part ''' 
Const wdPageBreak = 7 

Set WordApp = CreateObject("Word.Application") 
WordApp.Visible = FALSE 

'Open the doc 
Set objWord = WordApp.Documents.Open(WScript.Arguments.Item(0)) 

Set objSelection = WordApp.Selection 
objSelection.InsertBreak(wdPageBreak) 
objSelection.TypeText "" 

WordDoc.Close() 
WScript.Quit 
智慧

來源:

http://technet.microsoft.com/en-us/library/ee692875.aspx

http://technet.microsoft.com/en-us/library/ee692855.aspx