[已解决]如何根据个人编号从 Access数据库提取资料生成一张报销费用证明

hwc2ycy · 发表于 2013-5-28 23:12

本帖最后由 hwc2ycy 于 2013-5-28 23:14 编辑

报销证明打印.rar (46.8 KB, 下载次数: 5)

hwc2ycy · 发表于 2013-5-28 23:13

路径的话，你直接修改打印和导出二个按钮里这句

strPath = ThisWorkbook.Path & Application.PathSeparator

复制代码

hwc2ycy · 发表于 2013-5-28 23:50

报销证明打印.rar (43.69 KB, 下载次数: 6)

qinhuan66 · 发表于 2013-5-29 07:58

本帖最后由 qinhuan66 于 2013-5-29 09:12 编辑

hwc2ycy 发表于 2013-5-28 23:50
改了下，发现上午是走了弯路了，才发现问题出在哪里，

早上好老师！真的谢谢您。经测试发现下面两小问题。谢谢
1、如下图点击查询弹出下图（好像删除下图着色此行代码后测试一下，可以了）。

2、如下图第一步输完医保卡号开始日期结束后点击查询正常跳出数据，但到第二步直接点击打印时（前提是没有先点击导出为WORD文档这步）弹出下图。不过还是能生成WORD文档，但是出错了就不能打印了。

.......................................................................................................................................
再次请求老师下面这两点问题
1、对了保存路径这句strPath = ThisWorkbook.Path & Application.PathSeparator换成哪句呀？

2、导出的WORD证明能否做到有2位小数点。谢谢了(例如：1000元改成1000.00元

hwc2ycy · 发表于 2013-5-29 12:37

你看看你文件夹改对没没。
strPath = ThisWorkbook.Path & Application.PathSeparator & “已出具证明" & Application.PathSeparator
要改的话，打印和输出WORD两个的都得改。

hwc2ycy · 发表于 2013-5-29 13:16

文件夹已经改了。
那个标签未找到是早上重新加了错误处理，但刚好查询按钮的没测试。

报销证明打印.rar (43.58 KB, 下载次数: 5)

qinhuan66 · 发表于 2013-5-29 15:08

本帖最后由 qinhuan66 于 2013-5-29 17:54 编辑

hwc2ycy 发表于 2013-5-29 13:16
文件夹已经改了。
那个标签未找到是早上重新加了错误处理，但刚好查询按钮的没测试。

报销证明打印.rar (57.26 KB, 下载次数: 3)

hwc2ycy · 发表于 2013-5-29 18:14

这个最佳答案由 hwc2ycy 给出，感谢 hwc2ycy 的回答。

单击隐藏图章

报销证明打印.rar (47.35 KB, 下载次数: 13)

qinhuan66 · 发表于 2013-5-30 15:19

hwc2ycy 发表于 2013-5-29 18:14
你再试试，看看还能找到BUG不，

老师您好！大胆设想一下能否在查询的情况下在最后行行产生合计呢？谢谢。如果可以重新发贴求助。谢谢

hwc2ycy · 发表于 2013-5-30 15:27

这个是可以的啊。但是，不要占用A列就成了，因为我要有A列来定位数据，

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

[已解决]如何根据个人编号从 Access数据库提取资料生成一张报销费用证明

评分

评分

评分

评分

评分