材料/工具

office Word

批量導入圖片

在文檔中點擊“插入選項”

選擇圖片格式

彈出對話框，找到圖片存放路勁

同時按鍵盤“Ctrl”鍵和字母“A”鍵，就全部選擇了，點擊“插入”

Look，全部導入啦

批量修改圖片大小

點擊“視圖”選項

找到“宏”

點擊“查看宏”

輸入宏的名字，新建宏，我這里名字為“壓縮”

接著會彈出這個窗口

彈出“Microsoft Visual Basic”窗口，復制下面的代碼到代碼窗口里的End Sub哪一行前面：
Dim n '圖片個數
On Error Resume Next '忽略錯誤
For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes 類型 圖片
ActiveDocument.InlineShapes(n).Height = 5 * 28.35 '設置圖片高度為 5cm （1cm等于28.35px）
ActiveDocument.InlineShapes(n).Width = 4 * 28.35 '設置圖片寬度 4cm
Next n
'其中圖片本例中圖片尺寸為5cm和4cm

代碼粘貼好后點擊箭頭指出的運行按鈕，標題欄會出現運行中的提示，提示消失后關閉窗口

看，大小統一啦

批量壓縮圖片大小

先選中一張圖片

點擊”格式”

選擇“壓縮圖片”

取消“僅應用于此圖片”的勾選

選擇想要壓縮的效果，點擊確定

完成

聲明：本網頁內容旨在傳播知識，若有侵權等問題請及時與本網聯系，我們將在第一時間刪除處理。TEL:177 7030 7066 E-MAIL:11247931@qq.com