给honglai的例子

honglai

你的QQ怎么没上线呢？还有我下载的“中文ACCESS开发手册”用什么阅读器打开，密码是多少呢？这本书是轻魂上传的，你知道吗？如果知道的话请告诉我好吗？

tmtony

不好意思，我下午出去有事啦，所以没在线，你的短讯我收到了已复你，谢谢你的鼓励。
中文ACCESS开发手册是PDF格式 请用 Adobe Acrobat Reader V4.0 打开，请在此处下载
http://www.office-cn.net/tools/default.asp
打开密码：www.activeedu.net

honglai

请问用带参数的交叉表查询能创建报表吗？我试了好多次不行，有别的办法吗？

honglai

还有以后你帮我做程序的时候，能在每一句代码后面标上你的意思好吗？我不懂VBA，但我很想学，可以吗？

honglai

站长又来麻烦你真的不好意思，能帮我做成[组合12]即“物料名称”的记录来源为采购日期是当天或前一天的所有物料名称吗？
文件下载[em01]

tmtony

把进入的事件其中一句改为：
If Not (IsNull(组合12) Or Trim(组合12) = "") Then
  组合12.RowSource = "select distinct 品名,规格 from sheet1 where 采购日期 = Date - 1"
End If

honglai

还是不能实现，这句我刚开始也用了，可是没用呀，“组合12”不能显示品名，是空的，都零晨了还给小弟回贴子小弟真是十分感谢。

tmtony

你的程序里面链接有两个EXCEL文件，但你只传给我一个EXCEL
可否都过来，我改后程序再传上来给你。

honglai

不用了，本来我把“组合12”的记录来源设置成从today.xls进行链接，那样做很好实现，我已经能完成，后来又改变想法能否直接从sheet1中筛选出“组合12”的记录来源，其实today.xls是从sheet1中复制过去的，那样有点麻烦，你把EXCLE里的2002年1月8日的日期改成2002年3月11日，从”组合12“里显示日期为11日的所有物料名称和规格。明白我的意思吗？

花狐

为什么有些时候用不了呢?