如何引用excel的数据

惊叹不已 · 发表于 2002-3-29 14:23

啊,那你就应该趁此机会学VBA了,一边学一边结合实际解决工作上的问题,这种学习方法的效率和效果是最好的了,有什么问题就在论坛上提,我们会尽力为你解答的.

惊叹不已 · 发表于 2002-3-29 10:58

呵呵,除第1步是手工操作外,其余步骤全部是代码完成,不知道这样够不够自动. 别看到移动光标和复制粘贴就以为是手工操作,这些操作完全可以用代码来控制,比如移动光标就可以用Selection.GoTo或Selection.Move 其实关键在第5步,理解了这一步,其它基本不成问题了,建议你录制一段宏研究一下."插入"菜单如果没有"数据库"这一项,可以右击工具栏,选"自定义",然后选"插入",在右边的框中将"数据库"拖到"插入"菜单中. 自动产生合计项只是小儿科,简单得很,录制表格求和的宏就可得出代码. 不知你想生成什么格式?

惊叹不已 · 发表于 2002-3-28 16:32

有两种方法: 1.用ADO,考虑到这种方法要对ADO比较熟悉,所以略下不表. 2.用Word里面的"插入数据库"功能,现在说说这种方法. 主要思路如下: 1.将公共部分("根据应收贷款利息..."到"...单位：元"之间的内容)存为一个文件(.doc) 2.定义一个数组,里面保存经办行的名称,如bank(0)="仙岳分理处",bank(1)="湖里支行"等 3.打开刚才保存的文件以下是一个循环 4.将内容复制过来,将光标移到"根据..."的上面,Selection.TypeText bank(0) & "：" 5.移动光标到你要插入表格的位置,插入表格.以下代码是关键所在,是通过修改录制宏得来的. Selection.Range.InsertDatabase Format:=36, Style:=191, LinkToSource:=False _ , Connection:="整张电子表格", SQLStatement:= _ "SELECT 账号, 贷款户名, wdm, 金额 FROM C:\Documents and Settings\Administrator\桌面\Help\tz\clcj.xls WHERE (wdm = '" & bank(0) & "')" _ & "", PasswordDocument:="", PasswordTemplate:="", WritePasswordDocument _ :="", WritePasswordTemplate:="", DataSource:= _ "C:\Documents and Settings\Administrator\桌面\Help\tz\clcj.xls", From:=-1, _ To:=-1, IncludeFields:=True 6.移动光标到"你行"和"等单位"之间,读取表格中"贷款户名"到这里. 7.增加一页,重复刚才的步骤,直到处理完数组bank的最后一个元素.

惊叹不已 · 发表于 2002-3-27 17:05

你是否想把经办行相同的记录列成一个表格作为一页打印输出？是不是一定要在Word中完成？我觉得这个问题在Excel中完成会简单点。

惊叹不已 · 发表于 2002-3-25 20:10

不是很清楚你的要求,最好把文件及具体问题上传

		自动登录	找回密码
密码			免费注册

如何引用excel的数据

完全可行