word2007以上版本使用docm格式可以保存宏，保存的時候選擇類型為“帶宏的word文檔”就可以了，不用向下兼容。 不用VBA是無法實現這一功能的，實際上宏只是用代碼記錄下操作便于重復使用，其實質與作法與VBA沒有什么區別。不過，VBA是人工編寫代碼，宏是自動編寫代碼而已。 創建宏： 1、 創建新宏。點擊工具“開發工具”里的分組“代碼”里的“宏”命令代碼，在彈出的“宏”對話窗里的“宏名稱”下面的文本框里輸入宏名稱（這里輸入“CropPicture”），選擇“宏的位置”為當前的文檔。最后，點擊“創建”命令按鈕，會彈出VBA的IDE環境，里面已經給出CropPicture程序的程序頭尾。如下： Sub CropPicture() ' ' CropPicture 宏 ' ' End Sub 2、添加代碼 把下面代碼里的Sub CropPicture()與End Sub之間的代碼粘貼到上面提到的代碼之間或者直接用下面的代碼覆蓋上面提到的代碼。 '剪切圖片 Sub CropPicture() Dim shps As InlineShapes, shp As InlineShape Set shps = ActiveDocument.InlineShapes '左、右、頂、底邊各剪切20磅，根據需要修改就行了。 For Each shp In shps With shp.PictureFormat .CropLeft = 20 .CropRight = 20 .CropTop = 20 .CropBottom = 20 End With Next End Sub 添加熱鍵 點擊word文檔左上角的Office按鈕(logo圖標)，執行彈出菜單里的“word選項”，會彈出一個對話窗。 在彈出的對話窗里點擊左側導航條“自定義”，點擊右側設置項里的“鍵盤快捷方式”右側的“自定義”命令按鈕，會彈出“自定義鍵盤”對話窗。 將“指定命令”的類型選擇為“宏”，選擇“將更改保存在”右側的下拉列表，選擇為你正在編輯的文檔。這時，“宏”列表里會顯示當前文檔里的所有宏，我們選擇“CropPicture”，然后將光標移入“新按新快捷鍵”文本框，按下“Ctrl+Q”鍵，點擊“指定”命令按鈕退出，即可。 調用 按鍵盤鍵^q，就可以直接調用宏“CropPicture”，幫你把當前文檔里的所有圖片向內剪切40磅了。