批量剪裁圖片word

1. word2007裁剪和改變圖片大小的宏，怎麼批量修改，求大神修改下面宏代碼，要求批量修改！！！！！

Sub 裁剪() '本操作批量裁剪圖片
left_cut = 4.1 '左邊裁剪的大小 單位厘米
right_cut = 1.2 '右
top_cut = 2.3 '上
bottom_cut = 2.4 '下
scales = 1 / 0.03528 ' 一磅等於0.03528厘米
Dim n '圖片個數
'On Error Resume Next '忽略錯誤
For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes類型圖片
With ActiveDocument.InlineShapes(n).PictureFormat
origHeight = ActiveDocument.InlineShapes(n).Height
origWidth = ActiveDocument.InlineShapes(n).Width
.CropBottom = bottom_cut * scales
.CropLeft = left_cut * scales
.CropRight = right_cut * scales
.CropTop = top_cut * scales
End With
Next n
For n = 1 To ActiveDocument.Shapes.Count 'Shapes類型圖片
With ActiveDocument.Shapes(n).PictureFormat
origHeight = ActiveDocument.Shapes(n).Height
origWidth = ActiveDocument.Shapes(n).Width
.CropBottom = bottom_cut * scales
.CropLeft = left_cut * scales
.CropRight = right_cut * scales
.CropTop = top_cut * scales
End With
Next n
End Sub
'*************************************
Sub Macro() 』改變圖片大小，縮放不裁剪，批量操作
Mywidth=10'10為圖片寬度（厘米）
Myheigth=10'10為圖片高度（厘米）
For Each iShape In ActiveDocument.InlineShapes
iShape.Height = 28.345 * Myheigth
iShape.Width = 28.345 * Mywidth
Next iShape
End Sub

2. Word圖片修剪可以批量嗎

可以批量修改圖片大小，但是不能批量修剪圖片。

3. word如何批量裁剪圖片大小

答：word如何批量裁剪圖片大小：

• 首先我們將word打開，點擊上面的【插入】選項，在裡面點擊【圖片】，如圖所示。

  

4. word中如何對上百張圖片進行批量裁剪

如果用WORD怕是很難操作的。有個「曲線」點的方法可以操作：
1、將WORD文檔另存為網頁文件，它就會在保存位置自動生成一個文件夾，文檔里的所有圖片就被單獨保存下來的。
2、用PS裡面有一個「動作"功能，錄制一個裁剪尺寸的動作就可以一次將上百張圖片調整好，再重新導入回WORD中。
至於如何使用PS的「動作」功能，就不在本問題之內了，上網搜下也會有不少教程的。

5. 在WORD文檔中如何同時對多張圖片進行編輯

1、首先在Word文檔中插入三張圖片，例如需要批量對三張圖片進行大小的編輯。

6. word批量修改圖片後不清楚了

圖片被壓縮了。
如果是在默認的情況下修改圖片word程序會自動壓縮插入word文檔中的圖片以減小整個word文檔。
點擊-文件菜單，點擊-選項-打開word選項-點擊高級-找到-圖像大小和質量選項，勾選-不壓縮文件中的圖像就可以了。

7. Word里怎麼批量刪除重復的圖片

1打開Word，建立空白文檔。
2在文檔中插入多張圖片作為示例。3將文檔中的圖片設置為嵌入型。
4點擊【編輯】下的【替換】，或者按組合鍵Ctrl+H。
5接著將打開【查找和替換】窗口，在【查找內容】中輸入【^g】，在【替換為】中不輸入任何內容，然後點擊【全部替換】。
6然後將提示全部替換完成。
7再看源文檔，文檔中的圖片就全部都沒有了。
8需要注意的是，這種方法對襯於文字上方或下方的圖片不起用。演示如下。把源文檔中的全部圖片設置為【襯於文字上方】或【襯於文字下方】。
9然後執行相同的替換操作。
10可以看到，沒有一張圖片被替換成功。