设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 7542|回复: 19
打印 上一主题 下一主题

[帮助] 给honglai的例子

[复制链接]
跳转到指定楼层
1#
发表于 2002-3-6 06:47:00 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
我做了例子给子,program.mdb为程序文件 xlsdata.xls为数据
在使用前请重新链接EXCEL数据,指定到xlsdata.xls

由于时间不多,未作详细测试。
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
20#
发表于 2003-10-30 01:37:00 | 只看该作者

用不了

为什么有些时候用不了呢?
19#
发表于 2002-3-12 18:59:00 | 只看该作者
不用了,本来我把“组合12”的记录来源设置成从today.xls进行链接,那样做很好实现,我已经能完成,后来又改变想法能否直接从sheet1中筛选出“组合12”的记录来源,其实today.xls是从sheet1中复制过去的,那样有点麻烦,你把EXCLE里的2002年1月8日的日期改成2002年3月11日,从”组合12“里显示日期为11日的所有物料名称和规格。明白我的意思吗?

点击这里给我发消息

18#
发表于 2002-3-12 16:47:00 | 只看该作者
你的程序里面链接有两个EXCEL文件,但你只传给我一个EXCEL
可否都过来,我改后程序再传上来给你。
17#
发表于 2002-3-12 16:39:00 | 只看该作者
还是不能实现,这句我刚开始也用了,可是没用呀,“组合12”不能显示品名,是空的,都零晨了还给小弟回贴子小弟真是十分感谢。

点击这里给我发消息

16#
发表于 2002-3-12 08:43:00 | 只看该作者
把进入的事件其中一句改为:
If Not (IsNull(组合12) Or Trim(组合12) = "") Then
  组合12.RowSource = "select distinct 品名,规格 from sheet1 where 采购日期 = Date - 1"
End If


15#
发表于 2002-3-11 06:39:00 | 只看该作者
站长又来麻烦你真的不好意思,能帮我做成[组合12]即“物料名称”的记录来源为采购日期是当天或前一天的所有物料名称吗?
文件下载[em01]
14#
发表于 2002-3-11 05:37:00 | 只看该作者
还有以后你帮我做程序的时候,能在每一句代码后面标上你的意思好吗?我不懂VBA,但我很想学,可以吗?
13#
发表于 2002-3-11 05:34:00 | 只看该作者
请问用带参数的交叉表查询能创建报表吗?我试了好多次不行,有别的办法吗?

点击这里给我发消息

12#
发表于 2002-3-11 00:17:00 | 只看该作者
不好意思,我下午出去有事啦,所以没在线,你的短讯我收到了已复你,谢谢你的鼓励。
中文ACCESS开发手册是PDF格式 请用 Adobe Acrobat Reader V4.0 打开,请在此处下载
http://www.office-cn.net/tools/default.asp
打开密码:www.activeedu.net

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-12-1 20:28 , Processed in 0.086677 second(s), 34 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表