一、word如何启用宏
首先，打开带有宏的word文档，然后点击左上角文件按钮，如下图所示：
请点击输入图片描述
然后点击【选项】按钮，如下图所示：
请点击输入图片描述
点击完选项按钮，弹出如下图页面，然后点击下图中的【信任中心】按钮，如下图所示：
请点击输入图片描述
然后点击【信任中心设置】按钮，如下图所示：
请点击输入图片描述
点击完【信任中心设置】按钮，弹出如下图页面：
请点击输入图片描述
然后点击【宏设置】按钮，然后选中右边选项【禁用所有宏，并发出通知】，然后点击确定即可根据自己的需要启用宏，如下图所示：
请点击输入图片描述
二、word的宏
1、打开word，菜单——工具——宏——录制新宏，输入宏的名字，确定。
2、然后在word里操作，如果鼠标移动不了光标就用键盘移动，它可以录制键盘的操作信息。录制完了就再 菜单——工具——宏——停止录制。
3、查看宏：菜单——工具——宏——宏——选择已经录制好了的宏，然后点击编辑
4、运行宏：菜单——工具——宏——宏——运行
测试过了,只能插如图片,然后是不能自动选择了.宏如下:
Sub addimg()
Selection.InlineShapes.AddPicture FileName:="D:XX.jpg", LinkToFile:= _
False, SaveWithDocument:=True
End Sub
三、word宏操作处理图片
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磅了。
