Ⅰ WORD中圖片的批量修改
將圖片全部襯於文字下方--再全選照片--右健--組合(這時候那些圖片就是一個整體了)--再拉動圖片右下角進行縮放就可以了.
Ⅱ word如何批量調整圖片大小
1、首先打開Word文檔在插入圖片之前,先做一個設置,點擊上方工具欄中的「文件」
小技巧
Word中巧輸星期
單擊「格式→項目符號和編號」,進入「編號」選項卡,單擊「自定義」按鈕,在「編號樣式」欄內選擇「一、二、三」等樣式,在「編號格式」欄內的「一」前輸入「星期」即可。
粘貼網頁內容
在Word中粘貼網頁,只須在網頁中復制內容,切換到Word中,單擊「粘貼」按鈕,網頁中所有內容就會原樣復制到Word中,這時在復制內容的右下角會出現一個「粘貼選項」按鈕,單擊按鈕右側的黑三角符號,彈出一個菜單,選擇「僅保留文本」即可。
Ⅲ word批量修改圖片格式方法
word批量修改圖片格式具體步驟如下:
所需工具:word。
1、點擊word左上角的「工具」按鈕,下拉菜單,選中「選項」按鈕;
Ⅳ 如何在word中批量修改圖片大小 Word中怎麼批量修改圖片固定大小
如何在word中批量修改圖片大小
Word中怎麼批量修改圖片固定大小。相信很多人都使用過電腦中的word文檔功能,因為這對於很多人來說都會經常用到的,非常的具有實用性。
解決:按alt+F11。然後在project右鍵插入模塊,然後粘貼Sub
Macro()
Mywidth
=
4.13
Myheigth
=
5.48
For
Each
iShape
In
ActiveDocument.InlineShapesiShape.Height
=
28.345
*
Myheigth
iShape.Width
=
28.345
*
Mywidth
Next
iShape
End
Sub
再按F5,就行了。
其中Mywidth
=
4.13,Myheigth
=
5.48這里的數字你自己改大小。
固定長寬方法:
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
'設置圖片高度為
400pxActiveDocument.InlineShapes(n).Width
=
300
'設置圖片寬度
300pxNextn
Forn
=
1
ToActiveDocument.Shapes.Count
'Shapes類型圖片ActiveDocument.Shapes(n).Height
=
400
'設置圖片高度為
400pxActiveDocument.Shapes(n).Width
=
300
'設置圖片寬度
300pxNextn
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).Heightpicwidth
=
ActiveDocument.InlineShapes(n).WidthActiveDocument.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).Heightpicwidth
=
ActiveDocument.Shapes(n).WidthActiveDocument.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
控制項、圖片等。
好了,word批量修改圖片大小的方法就是這樣的了,這兩種方法各有千秋,大家可以根據情況自行選擇哦!
Ⅳ 如何在word中批量修改圖片大小
2、宏名起好了,單擊「創建」進入Visual
Basic
編輯器,輸入如下代碼並保存Subsetpicsize()'設置圖片大小Dimn'圖片個數On
Error
Resume
Next'忽略錯誤Forn
=
1ToActiveDocument.InlineShapes.Count
'InlineShapes類型圖片ActiveDocument.InlineShapes(n).Height
=
400'設置圖片高度為400pxActiveDocument.InlineShapes(n).Width
=
300'設置圖片寬度300pxNextnForn
=
1ToActiveDocument.Shapes.Count'Shapes類型圖片ActiveDocument.Shapes(n).Height
=
400'設置圖片高度為400pxActiveDocument.Shapes(n).Width
=
300'設置圖片寬度300pxNextnEnd
Sub3、返回word
,工具-宏-宏(或者直接按Alt+F8),再次進入宏的界面,選擇剛才編輯好的宏,並單擊「運行」按鈕,就可以了!(圖片多時,可能會花一些時間)
按比例縮放篇
具體操作同上,只是代碼部分稍做修改,代碼如下:Subsetpicsize()'設置圖片大小Dimn'圖片個數DimpicwidthDimpicheightOn
Error
Resume
Next'忽略錯誤Forn
=
1ToActiveDocument.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倍NextnFor
n
=
1ToActiveDocument.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'設置寬度為
ActiveDocument.InlineShapes(n).Range.ParagraphFormat.Alignment=
wdAlignParagraphCenter『左對齊:wdAlignParagraphLeft
注意:這里的Shapes(InlineShapes
Ⅵ word怎麼批量調整圖片大小
方法如下:
1、打開需要處理的Word文檔,點擊插入,然後選擇圖片;