word如何使用vba

1、在Word中打开你需要处理的doc文档；

2、键入ALT+F11；

3、在出现的VBA窗口中，粘贴你下载的代码；

4、把键盘光标放到入口函数中任意一行代码上（如果你不知道是什么地方，可以把代码贴上来看看）；

5、键入F5运行；

6、切换回doc文档窗口看效果。

补充：

哦，可能是因为你目前还没有任何宏所以才看到这样的灰色一片。

那就这样，现在左边的工程里面有个“Normal”吧？展开它后有个“模块”节点吧？在这个“模块”节点上点鼠标右键，选择“插入-模块”。这样右边就会出现代码窗口了。然后再按照上面步骤3-6。

如果还不清楚可以继续补充提问或发我信息。

第一步：打开word，如果功能区有开发工具选项，跳到步骤四,如果没有，继续

第二步：打开【文件】选项，点选【选项】

第三步：选择“自定义功能区”中点选“开发工具”，然后点击确定

第四步：点击菜单栏的【开发工具】，点击“Visual

Basic”选项，完成。

代码示例：

Sub showpath()

'1、获取当前文档的路径和文件名

aa = ThisWorkbook.Path '当前文件的路径

bb = ThisWorkbook.Name '当前文件的名称

cc = ThisWorkbook.FullName '当前文件的路径+名称

'2、在本示例中，EXCEL打开文件对话框，允许用户选择一个或多个文件，选中这些文件之后，逐条显示每个文件的路径

Dim ingcount As Long

With Application.FileDialog(msoFileDialogOpen) '提供文件对话框，允许用户打开文件

.AllowMultiSelect = True '允许用户从文件对话框中选择多个文件，false表示不允许选择多个文件

.Show '显示对话框

For ingcount = 1 To .SelectedItems.Count '从1到选中的文件数目循环

MsgBox .SelectedItems(ingcount) '显示文件的全路径

Next ingcount

End With

End Sub

补充：FileDialog说明

'提供文件对话框，返回一个FileDialog对象，该对象代表文件对话框的实例。

语法: expression.FileDialog (FileDialogType)

说明:

'expression 必需。该表达式返回"应用于"列表中的对象之一。

'FileDialogType 必需。MsoFileDialogType类型，文件对话框的类型。

MsoFileDialogType可以为以下常量之一:

msoFileDialogFilePicker 允许用户选择文件

msoFileDialogFolderPicker 允许用户选择一个文件夹

msoFileDialogOpen 允许用户打开文件, 用EXCEL打开

msoFileDialogSaveAs 允许用户保存一个文件

---