批量處理word文檔圖片大小

1、聲明：我下面要說的“批量修改wd里的圖片大小”的方法需要使用到宏，所以~~最好對(duì)VB有所了解！當(dāng)然~~這不是必需的，只要跟著我的圖文教程走，不知道什么是宏，不知道什么是VB也可以！wd批量修改圖片大小——固定長寬篇這部分要說的是把wd中的所有圖片修改成固定的并且相同的長和寬！1、打開wd，工具－宏－宏（或者直接按AltF8）進(jìn)入宏的界面，如下面所示，輸入一個(gè)宏名，宏名自己起，能記住就行！2、宏名起好了，單擊“創(chuàng)建”進(jìn)入VisualBas

2、ic編輯器，輸入如下代碼并保存Subsetpicsize()設(shè)置圖片大小Dimn圖片個(gè)數(shù)OnErrResumeNext忽略錯(cuò)誤Fn=1ToActiveDocument.InlineShapes.CountInlineShapes類型圖片ActiveDocument.InlineShapes(n).Height=105設(shè)置圖片高度為105pxActiveDocument.InlineShapes(n).Width=105設(shè)置圖片寬度105

3、pxNextnFn=1ToActiveDocument.Shapes.CountShapes類型圖片ActiveDocument.Shapes(n).Height=105設(shè)置圖片高度為105pxActiveDocument.Shapes(n).Width=105設(shè)置圖片寬度105pxNextnEndSub3、返回wd，工具－宏－宏（或者直接按AltF8），再次進(jìn)入宏的界面，選擇剛才編輯好的宏，并單擊“運(yùn)行”按鈕，就可以了?。▓D片多時(shí)，可