word居中縮放打印

《word居中縮放打印》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫。

1、Word文檔縮放并且居中打印方法左右和上下的文字在頁面中比例隨心變換！　　在Word中打印文檔時，經(jīng)常需要按照一定比例縮放或擴大。而在Word自帶的縮放打印功能中，縮放后頁面就縮放到頁面的左上方了，不能實現(xiàn)居中并且縮放打印，或者只能按照Word提供的幾種模式版面來縮放文檔(如在1張A4紙上打印2版、4版等，而要將文檔打印在A4紙的1/4版上則無法實現(xiàn))，卻不能按照任意比例縮放。下面咱們來動動手，讓W(xué)ord縮放打印給你更自由的天空?！　∫弧⒃O(shè)計打印窗體　　1.插入窗體　　啟動Word，執(zhí)行“工具→宏→VisualBasic編輯器”命令，在彈出的代碼窗口中，激活左側(cè)的“工程資源管理器”窗口中

2、的“Normal”對象，然后單擊代碼窗口菜單欄上的“插入”按鈕，在下拉菜單中選擇“用戶窗體”命令，此時，編輯器為工程自動生成一個空白的窗體UserForm1，將該窗體的Caption屬性改為“縮放打印”(圖1)。2.添加控件圖2要實現(xiàn)圖2的效果，需要添加2個標簽控件、2個文字框和一個命令按鈕。具體步驟如下:執(zhí)行“視圖→工具箱”命令，打開“工具箱”對話框，單擊[標簽]按鈕，在圖一所示的窗體編輯窗口上插入Label1控件，并將控件名稱改成“縮放比例(長)”，用同樣的方法，再依次插入Label2控件和1個命令按鈕，將名稱改為“縮放比例(高)”和“打印”。最后向窗體插入2個文字框，并且按圖2的版

3、式進行編排?！　《?、編寫代碼　　在窗體編輯窗口中，雙擊新添加的“打印”按鈕，進入“VisualBasic編輯器”，編輯該按鈕的單擊響應(yīng)代碼如下所示?！　rivateSubCommandButton1_Click()　　ActiveDocument.PrintOut_　　printzoompaperwidth:=_　　Val(TextBox1.Text)*(8.5*1440),_　　printzoompaperheight:=_　　Val(TextBox2.Text)*(11*1440)　　UserForm1.Hide　　EndSub　　該代碼顯示了打印區(qū)域的大小變化。為了操作方便，我們

4、還需編寫一段宏代碼來調(diào)用這個窗體。方法如下:在“Normal”對象下，插入模塊1，在代碼窗口中輸入以下代碼:　　Subshow()　　UserForm1.Show　　EndSub輸入完成后，關(guān)閉VBA窗口，返回到Word編輯窗口。　　三、將程序添加到菜單中　　由于每次打印文檔時，都要執(zhí)行“工具→宏→宏”命令，在宏對話框中運行宏“show”，這樣不是很方便，所以還需要將它添加到菜單中?！　≡赪ord文檔編輯模式下，執(zhí)行“工具→自定義”命令，打開“自定義”對話框，在“類別”下拉列表中選擇“宏”(圖3)。同時在右邊的“命令”下拉列表中找到剛剛編寫的宏，選中并按住鼠標左鍵，將它拖曳到菜單欄上。在

5、添加的菜單命令上單擊鼠標右鍵，在“命名”文本框中輸入新名稱“縮放打印”。最后關(guān)閉“自定義”對話框。打印文檔時，單擊“縮放打印”按鈕，系統(tǒng)彈出圖2所示的窗體，輸入縮放比例(例如想縮放80%，就輸入0.8)，點擊“打印”按鈕，文檔就會按要求自動打印出來了?！　⌒√崾?在本例中，讀者可以按照任意比例縮小并打印文檔。由于文檔允許擴大的最大數(shù)字為32767，我們在代碼中已將紙張設(shè)置為:高11×1440、寬為8.5×1440，因此，將文檔擴大打印時，會受一定比例限制。