位置:首頁(yè) > 軟件操作教程 > 辦公軟件 > Word > 問(wèn)題詳情

Word如何利用宏縮印照片 Word多張照片縮進(jìn)到同一張A4紙上技巧

提問(wèn)人:周麗平發(fā)布時(shí)間:2021-09-28

 首先,新建一個(gè)Word文檔,切換選項(xiàng)卡到“布局”,點(diǎn)擊圖中標(biāo)示熒光黃的位置打開(kāi)頁(yè)面設(shè)置。

image.png

  在頁(yè)面設(shè)置中,設(shè)置頁(yè)編劇商家左右全部為0.5厘米,紙張方向改為橫向。

image.png

  切換Word選項(xiàng)卡到插入,選擇要插入的照片文件,多選一次性插入。

image.png
image.png

  這時(shí),切換到選項(xiàng)卡到視圖一項(xiàng),點(diǎn)擊右側(cè)的“宏”。

image.png

  在彈出界面中,隨便輸入一個(gè)宏名稱(chēng),比如“打印”,然后點(diǎn)擊創(chuàng)建。

image.png

 重點(diǎn)來(lái)了!將一下內(nèi)容復(fù)制到彈出的Microsoft Visual Basic中,注意其中Height = 216 * 0.7、Width = 300 * 0.8中的數(shù)值,如果后續(xù)執(zhí)行時(shí)不能縮進(jìn)到同一頁(yè)面下,可以調(diào)整這部分的數(shù)字(登錄PC版查看歷史消息找到本文,復(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

image.png

  編輯完成后關(guān)閉,回到Word界面,點(diǎn)擊“宏”下拉菜單(倒三角),找到“查看宏”并單擊運(yùn)行,Word就會(huì)進(jìn)行自動(dòng)的縮放排序,多張圖片很容易就縮進(jìn)到一頁(yè)內(nèi)了,注意前面講的,如果不能,記得調(diào)整宏中Height、Width的數(shù)值。

image.png
image.png

  按下Ctrl+P調(diào)出打印頁(yè)面,選擇打印即可,一張A4規(guī)格的紙張就能縮進(jìn)多張圖片,是不是很神奇?這就是宏的作用,通過(guò)宏命令,可以將很多需要人手工一步一步調(diào)整的方法大大簡(jiǎn)化哦!

image.png

繼續(xù)查找其他問(wèn)題的答案?

回復(fù)(0)
返回頂部