Word批量修改圖片大小長(zhǎng)寬或按比縮放的方法

首先的批量添加圖片到Word中其實(shí)很簡(jiǎn)單，就是我們平時(shí)添加照片的辦法就行了。

步驟一：選中第1張圖片，按住鍵盤Shift鍵，再選中最后一張圖片。

步驟二：選中任意一張照片，同時(shí)按鍵盤“Ctrl”鍵和字母“A”鍵，全選

點(diǎn)擊“插入”

添加完后接著就開始編輯圖片了。

步驟一：在word軟件界面中依次點(diǎn)擊：開發(fā)工具→宏

步驟二：同時(shí)按鍵盤“Alt”鍵和“F8”鍵(后面簡(jiǎn)稱Alt+F8)

彈出宏創(chuàng)建窗口。

步驟二：：在宏名欄里任意輸入一個(gè)宏的名字，本例中我們使用“setpicsize”

步驟三：點(diǎn)擊創(chuàng)建。

步驟四：彈出“Microsoft Visual Basic”窗口，復(fù)制下面的代碼到代碼窗口里替換掉原有內(nèi)容：

Sub setpicsize() '設(shè)置圖片大小

Dim n '圖片個(gè)數(shù)

On Error Resume Next '忽略錯(cuò)誤

For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes 類型 圖片

ActiveDocument.InlineShapes(n).Height = 5 * 28.35 '設(shè)置圖片高度為 5cm (1cm等于28.35px)

ActiveDocument.InlineShapes(n).Width = 4 * 28.35 '設(shè)置圖片寬度 4cm

Next n

End Sub

'其中圖片本例中圖片尺寸為5cm和4cm

步驟五：點(diǎn)擊“Microsoft Visual Basic”窗口工具欄里的“運(yùn)行”按鈕(類似播放器里的播放按鈕)或者按鍵盤“F5”鍵

等待一會(huì)兒……(等待時(shí)間取決于你插入圖片的多少和你電腦的運(yùn)算速度)……

步驟六：待標(biāo)題欄上方的[正在運(yùn)行]消失后，點(diǎn)擊右上角小叉關(guān)閉“Microsoft Visual Basic”窗口。

大功告成!!

猜你喜歡：

總結(jié)

以上是生活随笔為你收集整理的px word 表格宽度_word怎样批量修改表格的宽度(2)的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。