word文檔批量修改圖片的方法

1、.手把手word批量導(dǎo)入、修改圖片大小和壓縮圖片 工作中，我們不時(shí)會(huì)需要將大量圖片插入word，并對(duì)其設(shè)置統(tǒng)一的尺寸大小。下面請(qǐng)跟隨我，學(xué)習(xí)批量導(dǎo)入、修改圖片尺寸和壓縮圖片的方法，讓你告別重復(fù)工作。工具/原料· Microsoft Word 2007一、批量導(dǎo)入圖片1. 1將所有需要導(dǎo)入的圖片放入同一文件夾，修改文件名，使其排列順序符合我們要求。2. 2打開(kāi)word，依次點(diǎn)擊：插入圖片3. 3在彈出的窗口，“查找范圍”框里找到需要插入圖片所在文件夾，方法一：選中第1張圖片，按住鍵盤Shift鍵，再選中最后一張圖片。方法二：選中任意一張照片，同時(shí)按鍵盤“Ctrl”鍵和字母“A”鍵，全選

2、點(diǎn)擊“插入”4. 4效果如圖END批量修改圖片尺寸1. 1接上面的例子。方法一：在word軟件界面中依次點(diǎn)擊：開(kāi)發(fā)工具宏方法二：同時(shí)按鍵盤“Alt”鍵和“F8”鍵（后面簡(jiǎn)稱Alt+F8）彈出宏創(chuàng)建窗口2. 2在宏名欄里任意輸入一個(gè)宏的名字，本例中我們使用“setpicsize”點(diǎn)擊創(chuàng)建3. 3彈出“Microsoft Visual Basic”窗口，復(fù)制下面的代碼到代碼窗口里替換掉原有內(nèi)容：Sub setpicsize() '設(shè)置圖片大小Dim n '圖片個(gè)數(shù)On Error Resume Next '忽略錯(cuò)誤For n = 1 To ActiveDocument.In

3、lineShapes.Count 'InlineShapes 類型 圖片ActiveDocument.InlineShapes(n).Height = 5 * 28.35 '設(shè)置圖片高度為 5cm （1cm等于28.35px）ActiveDocument.InlineShapes(n).Width = 4 * 28.35 '設(shè)置圖片寬度 4cmNext nEnd Sub'其中圖片本例中圖片尺寸為5cm和4cm4. 4點(diǎn)擊“Microsoft Visual Basic”窗口工具欄里的“運(yùn)行”按鈕（類似播放器里的播放按鈕）或者按鍵盤“F5”鍵等待一會(huì)兒（等待時(shí)間取決于你插入圖片的多少和你電腦的運(yùn)算速度）5. 5待標(biāo)題欄上方的正在運(yùn)行消失后，點(diǎn)擊右上角小叉關(guān)閉“Microsoft Visual Basic”窗口。大功告成！END批量壓縮圖片大小1. 1選中任意一張圖片，依次點(diǎn)擊：“格式”“壓縮圖片”2. 2在彈出的“壓縮圖片”窗口里點(diǎn)擊“選項(xiàng)”；在彈出的“壓縮設(shè)置