材料/工具
word軟件電腦
方法
在電腦上打開word,進入自己操作的文檔頁面
將所有需要導入的圖片放入同一文件夾,修改文件名,使其排列順序符合我們要求。
打開word,進入文檔操作界面,點擊右上角如圖“插入”
點擊“插入”之後,點擊插入中的圖片,如圖所示
在彈出的窗口,“查找範圍”框裏找到需要插入圖片所在文件夾,
方法一:選中第1張圖片,按住鍵盤Shift鍵,再選中最後一張圖片。
方法二:選中任意一張照片,同時按鍵盤“Ctrl”鍵和字母“A”鍵,全選
點擊“插入”
接x下來
方法一:在word軟件界面中依次點擊:視圖→宏
方法二:同時按鍵盤“Alt”鍵和“F8”鍵(後面簡稱Alt+F8)
彈出宏創建窗口
在宏名欄裏任意輸入一個宏的名字,本例中我們使用“Wendy”
點擊創建
彈出“Microsoft Visual Basic”窗口,複製下面的代碼到代碼窗口裏替換掉原有內容:
Sub setpicsize() '設置圖片大小
Dim n '圖片個數
On Error Resume Next '忽略錯誤
For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes 類型 圖片
ActiveDocument.InlineShapes(n).Height = 5 * 28.35 '設置圖片高度為 5cm (1cm等於28.35px)
ActiveDocument.InlineShapes(n).Width = 4 * 28.35 '設置圖片寬度 4cm
Next n
End Sub
其中圖片本例中圖片尺寸為5cm和4cm
點擊“Microsoft Visual Basic”窗口工具欄裏的“運行”按鈕(類似播放器裏的播放按鈕)或者按鍵盤“F5”鍵
待標題欄上方的[正在運行]消失後,點擊右上角小叉關閉“Microsoft Visual Basic”窗口。
大功告成!!