VBA是Word軟體重要的擴展功能之一，具有強大的代碼編輯和執行功能。那麼如何利用VBA來修改Word中圖片的大小呢？下面作者給大家演示一下詳細的操作流程。
統一大小
1、點擊滑鼠右鍵，選擇“新建”選項，然後點擊“mircosoft Word 2007”新建一個Word文件。
2、選擇Word界面上方的“插入”選項，然後點擊'“圖片”按鈕。
3、選中需要編輯的圖片，然後點擊“插入”按鈕。
4、圖片插入完成後，點擊“開發工具”選項，然後選擇“宏”進行VBA代碼寫入。
5、寫明代碼的名稱，然後點擊“創建”按鈕。
6、寫入VBA代碼，主要利用代碼為shap.width（寬度設置）和shap.height（高度設置），然後關閉界面。
7、選擇編輯完成的代碼，然後點擊“執行”按鈕。
8、圖片大小就修改完成了。
圖片排版
有一個很長的總結報告，100頁左右。裡面的圖片格式比較亂，需要統一改為單倍行距、居中對齊、去掉首行縮進、統一長寬尺寸。
Sub 圖片格式()
Dim pic As InlineShape '定義pic
For Each pic In ActiveDocument.InlineShapes '遍歷每一張嵌入的圖片
With pic.Range.ParagraphFormat '設置圖片所在段落格式
.LineSpacingRule = wdLineSpaceSingle '單倍行距
.CharacterUnitFirstLineIndent = 0 '首行空0字元
.FirstLineIndent = CentimetersToPoints(0) '首行縮進0磅，注意要和上面的0字元同時使用，否則不行
.Alignment = wdAlignParagraphCenter '居中對齊
End With
pic.LockAspectRatio = msoFalse 'msoTrue '是否鎖定長寬比
pic.Height = 6 * 28.345 '設置長寬，把厘米轉化為磅值
pic.Width = 8 * 28.345
Next
End Sub以上就是利用VBA統一修改word文檔中圖片格式的技巧，希望大家喜歡，請繼續關注。<
原創文章，作者：簡單一點，如若轉載，請註明出處：https://www.506064.com/zh-tw/n/184662.html
微信掃一掃 
支付寶掃一掃 