1、新建一個(gè)Word文檔，然后點(diǎn)擊菜單欄上的“布局”菜單
2、接下來點(diǎn)擊工具欄上的箭頭所指的位置，打開Word頁面設(shè)置窗口
3、在頁面設(shè)置窗口中，我們把頁邊距設(shè)置為0.5厘米，然后調(diào)整紙張方向?yàn)闄M向
4、接著點(diǎn)擊菜單欄上的“插入”菜單項(xiàng)，在打開的插入工具欄上點(diǎn)擊“圖片”按鈕，在打開的窗口選擇要插入的圖片文件，把需要打印的圖片全部插入到文檔中
5、然后點(diǎn)擊菜單欄上的“視圖”菜單項(xiàng)，接著點(diǎn)擊工具欄上的“宏”按鈕
6、在打開的宏設(shè)置窗口中，為要編輯的宏設(shè)置一個(gè)名稱，如“調(diào)整照片大小”，然后點(diǎn)擊右側(cè)的“創(chuàng)建”按鈕
7、在打開的代碼輸入框中輸入以下代碼：
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
其中Height與Width可以根據(jù)實(shí)際情況重新調(diào)整，一般默認(rèn)就可以了
8、關(guān)閉剛剛的代碼輸入框，回到Word文檔后，點(diǎn)擊宏下拉菜單，然后選中并點(diǎn)擊“查看宏”菜單項(xiàng)
9、在打開的宏窗口中在左側(cè)窗口中選中剛剛創(chuàng)建的宏，點(diǎn)擊“運(yùn)行”按鈕
10、這時(shí)所有的圖片就自動(dòng)排列到一個(gè)A4紙上了，使用打印功能就可以快速方便的打印出一副整齊美觀的照片了。
