Word中在1張A4紙上打印8張圖片要如何排版

時(shí)間：2016-03-28 11:37:57 試工754由分享

　　還在為沒實(shí)例教程而煩惱嗎，小編這就為您獻(xiàn)上Word中將1張A4紙上打印8張圖片如何排版的實(shí)例教程事例。

　　辦公技巧：Word中將1張A4紙上打印8張圖片如何排版：

　　描述：辦公技巧：Word中將1張A4紙上打印8張圖片如何排版

　　這是辦公自動(dòng)化中的高級(jí)技巧，為了節(jié)約紙張?jiān)趺丛贏4紙上打印8張圖片，接下來我們要好好利用Word排版將8張圖打印到A4紙張上，按照下面的方法來操作吧!寧波新錦程教育為您提供圖文教程。

　　操作步驟

　　1 打開Word文檔，點(diǎn)擊“文件”→“頁(yè)面設(shè)置”。

　　2 在“頁(yè)面設(shè)置”中把“頁(yè)邊距”上下左右全改為“0.5厘米”，再將方向改成“橫向”接著按“確定”。

　　3 然后插入要打印的圖片，點(diǎn)擊菜單欄“插入”→“圖片”→“來自文件”。

　　4 找到存放圖片的路徑選擇圖片，并點(diǎn)擊“插入”。

　　5 此時(shí)圖片插入Word文檔內(nèi)。

　　6 接著點(diǎn)擊“工具”→“宏(M)”→“宏(M)”。

　　7 此時(shí)彈出“宏”設(shè)置窗口，在“宏名”下輸入名稱，輸入完成后點(diǎn)擊“創(chuàng)建”如下圖。

　　8 彈出“Microsoft Visual Basic”復(fù)制下面代碼粘貼到“代碼”窗中保存。

　　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

　　9 再回到Word文檔界面，單擊菜單欄“工具”→“宏(M)”→“宏(M)”選擇剛才輸入的名稱點(diǎn)擊“運(yùn)行”即可。

　　10 此時(shí)Word文檔內(nèi)的圖片都縮小到A4紙張能打印8張圖的目標(biāo)。