word文件里面图片整体缩放

1. 镐庝箞鎶妛ord涓镄勫浘鐗囨斁婊℃暣涓椤甸溃锛

瑕佸皢 Word 涓镄勫浘鐗囱剧疆涓哄～婊℃暣涓椤甸溃锛屽彲浠ユ寜镦т互涓嬫ラよ繘琛屾搷浣滐细

• 鍦 Word 鏂囨。涓鎻掑叆锲剧墖銆傚彲浠ヤ娇鐢ㄨ彍鍗曟爮涓婄殑"鎻掑叆"阃夐”鍗★纴铹跺悗镣瑰嚮"锲剧墖"鎸夐挳𨱒ユ彃鍏ュ浘鐗囨枃浠躲

• 阃変腑鎻掑叆镄勫浘鐗囥傚崟鍑讳竴娆″浘鐗囷纴纭淇濆畠琚阃変腑銆

• 鍦ㄨ彍鍗曟爮涓婄殑"镙煎纺"阃夐”鍗′腑锛屾垒鍒"锲剧墖宸ュ叿"缁勚傜偣鍑昏ョ粍涓嬬殑"镙煎纺"鎸夐挳锛屼互镓揿紑锲剧墖镙煎纺璁剧疆闱㈡澘銆

• 鍦ㄥ浘鐗囨牸寮忚剧疆闱㈡澘涓镄"澶у皬"閮ㄥ垎锛屾垒鍒"缂╂斁"阃夐”銆傝风‘淇"缂╂斁"阃夐”镞佽竟镄勯挛褰㈠浘镙囨槸瑙ｉ挛鐘舵侊纴杩欐牱镓嶈兘镊鐢辫皟鏁村浘鐗囧ぇ灏忋

• 灏"缂╂斁"阃夐”涓镄勭栌鍒嗘瘆鏀逛负"100%"銆备綘涔熷彲浠ユ坠锷ㄨ緭鍏"100%"锛屾垨钥呴氲繃镣瑰嚮锏惧垎姣旀梺杈圭殑涓娄笅绠澶撮愭笎璋冩暣澶у皬銆

• 鍦ㄥ浘鐗囨牸寮忚剧疆闱㈡澘涓镄"鏂囨湰鐜缁"閮ㄥ垎锛岄夋嫨"绱у瘑鍨"锛岃繖灏嗕娇寰楀浘鐗囦笌鏂囧瓧鐩搁偦锛屽苟瑕嗙洊鏁翠釜椤甸溃銆

• 镣瑰嚮锲剧墖镙煎纺璁剧疆闱㈡澘涓婄殑"鍏抽棴"鎸夐挳锛屽畬鎴愯剧疆銆

瀹屾垚浠ヤ笂姝ラゅ悗锛屽浘鐗囧簲褰撹璋冩暣骞跺～婊℃暣涓椤甸溃銆备綘鍙浠ュ湪镓揿嵃棰勮堟垨瀹为檯镓揿嵃杈揿嚭涓镆ョ湅鏁堟灉銆傝锋敞镒忥纴锲剧墖镄勮川閲忓拰姣斾緥鍙鑳戒细锲犳媺浼歌屾湁镓鎹熷け锛屽缓璁阃夋嫨楂桦垎杈ㄧ巼镄勫浘鐗囦互銮峰缑镟村ソ镄勭粨鏋溿

2. Word中批量修改图片大小和缩放比例方法

最近小编遇到一个问题：需要将一篇word文档中的所有图片全部缩小比例。一张张改太麻烦了。于是从网上搜罗了一下，还真找到了解决办法。需要注意的地方 就是注意厘米与像素的换算关系。一般情况下1厘米=28px 。这个换算关系其实可以用计算器计算出来。计算公式为图片改变之后的像素除以改变之后图片的大小厘米。
固定长宽篇
这部分要说的是把word中的所有图片修改成固定的并且相同的长和宽！
1、打开word，工具－宏－宏（或者直接按Alt+F8）进入宏的界面，如下面所示，输入一个宏名，宏名自己起，能记住就行！

2、宏名起好了，单击“创建”进入Visual Basic 编辑器，输入如下代码并保存
Sub setpicsize() '设置图片大小
Dim n '图片个数
On Error Resume Next '忽略错误
Forn = 1 ToActiveDocument.InlineShapes.Count 'InlineShapes类型图片
ActiveDocument.InlineShapes(n).Height = 400 '设置图片高度为 400px
ActiveDocument.InlineShapes(n).Width = 300 '设置图片宽度 300px
Nextn
Forn = 1 ToActiveDocument.Shapes.Count 'Shapes类型图片
ActiveDocument.Shapes(n).Height = 400 '设置图片高度为 400px
ActiveDocument.Shapes(n).Width = 300 '设置图片宽度 300px
Nextn
End Sub

3、返回word，工具－宏－宏（或者直接按Alt+F8），再次进入宏的界面，选择刚才编辑好的宏，并单击“运行”按钮，就可以了！（图片多时，可能会花一些时间）
按比例缩放篇
这部分要说的是把word中的所有图片按比例缩放！
具体操作同上，只是代码部分稍做修改，代码如下：
Sub setpicsize() '设置图片大小
Dim n '图片个数
Dimpicwidth
Dimpicheight
On Error Resume Next '忽略错误
For n = 1 ToActiveDocument.InlineShapes.Count 'InlineShapes类型图片
picheight = ActiveDocument.InlineShapes(n).Height
picwidth = ActiveDocument.InlineShapes(n).Width
ActiveDocument.InlineShapes(n).Height = picheight * 1.1 '设置高度为1.1倍
ActiveDocument.InlineShapes(n).Width = picwidth * 1.1 '设置宽度为1.1倍
Nextn
For n = 1 To ActiveDocument.Shapes.Count 'Shapes类型图片
picheight = ActiveDocument.Shapes(n).Height
picwidth = ActiveDocument.Shapes(n).Width
ActiveDocument.Shapes(n).Height = picheight * 1.1 '设置高度为1.1倍
ActiveDocument.Shapes(n).Width = picwidth * 1.1 '设置宽度为1.1倍
Nextn
End Sub

若还想使所有图片居中对齐，可在循环中加入下面的语句：
ActiveDocument.InlineShapes(n).Range.ParagraphFormat.Alignment= wdAlignParagraphCenter

‘左对齐：wdAlignParagraphLeft

注意：这里的Shapes（InlineShapes）不仅仅是指图片，也包含其它的，自选图形、任意多边形、OLE 对象、ActiveX 控件、图片等。

3. 怎么批量把word中的图片的大小都缩小

word中的图片的大小都缩小是利用word中的工具：宏功能，对图片进行宽高设置，等比例缩放操作。具体的方法如下：

1.具体操作同上：打开word，工具－宏－宏（或者直接按Alt+F8）进入宏的界面，如下面所示；

注意事项：

1.需要注意的地方 就是注意厘米与像素的换算关系。一般情况下1厘米=28px 。这个换算关系其实可以用计算器计算出来。计算公式为图片改变之后的像素除以改变之后图片的大小厘米。

2.这里的Shapes（InlineShapes）不仅仅是指图片，也包含其它的，自选图形、任意多边形、OLE 对象、ActiveX 控件、图片等。

4. word鏂囨。镐庝箞闆嗕綋璋冨浘鐗囧ぇ灏弚ord鏂囨。镐庝箞闆嗕綋璋冨浘鐗囧ぇ灏忓拰瀹藉害

銆宸为椃娓椼瑕佸湪Word鏂囨。涓闆嗕綋璋冩暣澶氩紶锲剧墖镄勫ぇ灏忥纴鍙浠ユ寜镦т互涓嬫ラよ繘琛屾搷浣滐细
銆銆1. 阃変腑镓链夐渶瑕佽皟鏁村ぇ灏忕殑锲剧墖锛氭寜浣廋trl阌锛屽苟鍗曞嚮榧犳爣宸﹂敭渚濇￠夋嫨镓链夌殑锲剧墖銆傛垨钥呭湪鏂囨。涓杩涜屾嗛夛纴阃変腑镓链夌殑锲剧墖銆
銆銆2. 鍦ㄢ沧牸寮忊濋夐”鍗′腑镣瑰嚮钬滃浘鐗囧伐鍏锋牸寮忊濋夐”鍗°
銆銆鍐岃剨3. 鍦ㄢ滃ぇ灏忊濈粍涓锛屽彲浠ヤ娇鐢ㄤ互涓嬩袱绉嶆柟娉曡繘琛岃皟鏁村浘鐗囧ぇ灏忥细
銆銆- 鏂规硶涓锛氱洿鎺ヨ剧疆锲剧墖澶у皬姣斾緥锛
銆銆- 镣瑰嚮钬滃ぇ灏忊濈粍涓镄勨灭缉鏀锯濇寜阍锛屽湪寮瑰嚭镄勯夐”鍐呴夋嫨鐩稿簲镄勭栌鍒嗘瘆澶у皬銆
銆銆- Word灏嗕细鎸夌収镓阃夋瘆渚嬭皟鏁存墍链夐変腑镄勫浘鐗囩殑澶у皬銆
銆銆- 鏂规硶浜岋细鎸囧畾鍏蜂綋镄勫浘鐗囧昂瀵革细
銆銆- 镣瑰嚮钬滃ぇ灏忊濈粍涓镄勨滃ぇ灏忓拰浣岖疆钬濇寜阍锛屽皢浼氩脊鍑衡滃ぇ灏忓拰浣岖疆钬濈獥鍙ｃ
銆銆- 鍦ㄢ滃ぇ灏忊濋夐”鍗′腑锛屽彲浠ヨ皟鏁村浘鐗囩殑灏哄革纴杈揿叆鍏蜂綋镄勫藉害鍜岄珮缃╃┖搴︽暟鍊兼潵杩涜岃惧畾銆
銆銆- 鍦ㄦょ獥鍙ｄ腑杩桦彲浠ヨ剧疆鍏朵粬鍙傛暟锛屽傞挛瀹氱旱妯姣斾緥銆佺浉瀵逛簬椤甸溃镄勪綅缃绛夈
銆銆- 璋冩暣濂藉弬鏁板悗锛岀偣鍑烩灭‘瀹气濇寜阍搴旂敤璁剧疆銆