1.word如何使用vba
1、在Word中打开你需要处理的doc文档;2、键入ALT+F11;3、在出现的VBA窗口中,粘贴你下载的代码;4、把键盘光标放到入口函数中任意一行代码上(如果你不知道是什么地方,可以把代码贴上来看看);5、键入F5运行;6、切换回doc文档窗口看效果。
补充:哦,可能是因为你目前还没有任何宏所以才看到这样的灰色一片。那就这样,现在左边的工程里面有个“Normal”吧?展开它后有个“模块”节点吧?在这个“模块”节点上点鼠标右键,选择“插入-模块”。
这样右边就会出现代码窗口了。然后再按照上面步骤3-6。
如果还不清楚可以继续补充提问或发我信息。
2.怎样在Word中用VBA操作表格
1、在新工作表的Sheet1上点击右键
2、选择查看代码
3、点击倒三角,选择Worksheet
4、点击右边倒三角,选择触发方式,如BeforeDoubleClick表示在双击鼠标左键时触发
5、点击候出现如下代码框架
6、输入以下语句:Sheet1.Cells(1, 3) = Sheet1.Cells(1, 1) + Sheet1.Cells(1, 2)意为将A1、B1单元格求和并放在C1单元格
7、点击保存,然后关闭VBA窗口
8、由于A1,B1没有数据,所以C1为0
9、输入数据后,会发现即使按了回车,C1也不变,因为设置的是双击鼠标左键触发。
10、双击鼠标左键后就变了
3.word和excel vba综合编程
在Excel下编程,使用下列语句打开Word文档
Dim Wrd
Set Wrd = CreateObject("Word.Application")
Wrd.documents.Open Filename:=DOCFile, ReadOnly:=True '以只读方式打开Word文档
Wrd.Visible = True '让其可见(只读状态打开时,默认不可见)
通过类似于下面的语句,可以访问Word文档中的表格数据(注意:返回的数据去掉最后两个字符(回车和表格符))
Wrd.documents(DOCFile).Tables(4).Cell(9, 3).Range.Text 'Word文档中第4个表格的第9行第3列的文本。
至于文本,要通过设定选择集(Selection,可通过查找题目,然后改变选择区域的大小(Collapse方法))来复制和粘贴数据(查看Word的VB帮助)
得到Word文档中的数据后,往Excel文档对应的单元格赋值即可。
实际编写起来工作量较大,不超过几千份问卷,还是手工做吧!(初学者做完这个程序,估计要3、5天)
详细可联系:591zheteng@sina.com
转载请注明出处51数据库 » 在word中用vba编程