欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

Word2016怎么批量調(diào)整圖片大小?

  發(fā)布時間：2017-06-13 17:24:34   作者：佚名   我要評論
Word2016怎么批量調(diào)整圖片大??？word2016文檔中的圖片有很多，想要快速的調(diào)整圖片的大小，該怎么調(diào)整呢？下面我們就來看看使用word中的宏批量調(diào)整圖片大小的教程，需要的朋友可以參考下

在我們用Word2016 編輯器文檔的時候，經(jīng)常會遇到打印一些圖片的情況，但是手工插入后圖片后，打印出來有些亂，很不美觀，特別是有多個圖片的情況時。這時我們可以使用Word2016 中的宏功能，讓其自動批量調(diào)整圖片的大小，使得打印的圖片整齊美觀。

1、新建一個Word文檔，然后點擊菜單欄上的“布局”菜單

2、接下來點擊工具欄上的箭頭所指的位置，打開Word頁面設(shè)置窗口

3、在頁面設(shè)置窗口中，我們把頁邊距設(shè)置為0.5厘米，然后調(diào)整紙張方向為橫向

4、接著點擊菜單欄上的“插入”菜單項，在打開的插入工具欄上點擊“圖片”按鈕，在打開的窗口選擇要插入的圖片文件，把需要打印的圖片全部插入到文檔中

5、然后點擊菜單欄上的“視圖”菜單項，接著點擊工具欄上的“宏”按鈕

6、在打開的宏設(shè)置窗口中，為要編輯的宏設(shè)置一個名稱，如“調(diào)整照片大小”，然后點擊右側(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ù)實際情況重新調(diào)整，一般默認(rèn)就可以了

8、關(guān)閉剛剛的代碼輸入框，回到Word文檔后，點擊宏下拉菜單，然后選中并點擊“查看宏”菜單項

9、在打開的宏窗口中在左側(cè)窗口中選中剛剛創(chuàng)建的宏，點擊“運行”按鈕

10、這時所有的圖片就自動排列到一個A4紙上了，使用打印功能就可以快速方便的打印出一副整齊美觀的照片了

相關(guān)推薦：

Word2016怎么隱藏文件中的圖片?

Word2016怎么插入圖片？Word2016插入圖片控件教程

Word2016怎么裁剪圖形? word2016裁剪圖片的詳細(xì)教程

相關(guān)文章

最新評論