用宏自動調整word文檔中圖片尺寸

Word 打印機 BASIC語言 科技 電腦愛好者 2017-06-08

平時想用電腦打印兩張照片最簡單的方法就是把照片複製粘貼到word文檔中,然後將文檔用打印機打印出來。不過碰到一些尺寸不同的照片在word文檔中調整大小就變得非常麻煩了。我們可以通過宏來自動調整照片大小,讓這些照片可以放在一張A4紙下。

新建一個Word文檔,切換選項卡到“佈局”,點擊圖中標示熒光黃的位置打開頁面設置。

用宏自動調整word文檔中圖片尺寸

在頁面設置中,將設置頁邊距上下左右都設置為0.5釐米,紙張方向改為橫向。

用宏自動調整word文檔中圖片尺寸

選擇Word選項卡中的插入選項,選擇要插入的照片文件,多選一次性插入。

用宏自動調整word文檔中圖片尺寸

用宏自動調整word文檔中圖片尺寸

這時,切換到選項卡到視圖一項,點擊右側的“宏”。

用宏自動調整word文檔中圖片尺寸

在彈出界面中,隨便輸入一個宏名稱,比如“打印”,然後點擊創建。

將以下內容複製到彈出的Microsoft Visual Basic中,注意其中Height = 216 * 0.7、Width = 300 * 0.8中的數值。如果後續執行時不能縮進到同一頁面下,可以調整這部分的數字。

Dim i As Integer

For i = 1 To ActiveDocument.InlineShapes.Count

With ActiveDocument.InlineShapes(i)

.Height = 238 * 0.7

.Width = 315 * 0.8

.Borders(wdBorderTop).LineStyle = wdLineStyleSingle

.Borders(wdBorderTop).LineWidth = wdLineWidth050pt

.Borders(wdBorderTop).Color = wdColorAutomatic

End With

Next i

用宏自動調整word文檔中圖片尺寸

編輯完成後關閉,回到Word界面,點擊“宏”下拉菜單(倒三角),找到“查看宏”並單擊運行,Word就會進行自動的縮放排序,多張圖片很容易就縮進到一頁內。如果不能,記得調整宏中Height、Width數值。

用宏自動調整word文檔中圖片尺寸

用宏自動調整word文檔中圖片尺寸

按下Ctrl+P調出打印頁面,選擇打印即可,一張A4規格的紙張就能縮進多張圖片,是不是很方便?通過宏命令,可以將很多需要人手工一步一步調整的方法變成一步。以後打印照片就方便多啦。

用宏自動調整word文檔中圖片尺寸

相關推薦

推薦中...