Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

Access问答 → 默认上个月的记录

默认上个月的记录

lyj　 发表于：2010-08-03 20:26:08 　
复制

以前有咨询过这个问题，但是老师告诉的方法后来试了下，不能实现。我要8月的记录默认是7月的值。

哪位老师帮忙再看看?谢谢！

点击下载此附件

 

Top
蒋元根 发表于：2010-08-03 22:29:35

供参考:

SELECT cost.year, cost.month, cost.[plan/FC], cost.cost
FROM cost
WHERE (((cost.year)=IIf((Month(Date()))=1,Year(Date())-1,Year(Date()))) AND ((cost.month)=IIf((Month(Date()))=1,12,(Month(Date())-1))));

点击下载此附件

Top
lyj 发表于：2010-08-04 10:19:00

谢谢！我还想保留上个月的记录。每个月的记录都要保存，不能覆盖。只是当月的记录默认是上一个月的值，有办法实现吗？

 



Top
蒋元根 发表于：2010-08-04 10:50:54

不知是否符合你的想法,供参考:

SELECT cost.year, cost.month, cost.[plan/FC], cost.cost
FROM cost
WHERE (((cost.year)<=IIf((Month(Date()))=1,Year(Date())-1,Year(Date()))) AND ((cost.month)<=IIf((Month(Date()))=1,12,(Month(Date())-1))))
ORDER BY cost.year, cost.month;

点击下载此附件

Top
lyj 发表于：2010-08-04 16:58:09

但是我要输入8月的值时，默认不是上个月的。



Top
蒋元根 发表于：2010-08-04 20:11:41

输入时,cost默认上个月的值,不知是否符合你的想法,供参考:

 

Private Sub cost_Click()

Me.[cost] = DLookup("cost", "查询上月", "[plan/FC]='" & Me.[plan/FC] & "'")
End Sub

 

 

点击下载此附件

Top
蒋元根 发表于：2010-08-04 21:30:03

方法二,供参考

点击下载此附件

Top
lyj 发表于：2010-08-05 11:19:56
非常感谢！如果有多个项目，没个月根据不同的项目号有不同的值，就不行了？

Top
lyj 发表于：2010-08-05 11:20:53

access测试文档

点击下载此附件

Top
lyj 发表于：2010-08-05 11:28:52
能不能用第一种方法优化下？谢谢！

Top
蒋元根 发表于：2010-08-05 15:55:49
第一种方法公式没有问题,你的表中间同一月的[plan/fc]cost数据有几条不同数据.请检查.点击下载此附件

Top
煮江品茶 发表于：2010-08-05 16:06:38
用子窗体，用当月最后一条记录做默认值即可。

Top
lyj 发表于：2010-08-05 20:15:25
用当月最后一条记录做默认值不行。主要是同一个月有不同的项目记录，默认最后一条记录不能和相应的项目相关联。

Top
lyj 发表于：2010-08-05 20:21:46

蒋老师，同一个月就是有不同的数据。我的主要目的是为了当月更新时不需要重新输入数据，只要更新一部分。例如，

 

月 项目号 Plan/FC 成本

7   10     plan    10

7   10     FC      8

7   11     Plan    20

7   11     FC      22

8   10     plan    10(默认项目号10的上个月数据)

8   10     FC      8 (默认项目号10的上个月数据)

8   11     Plan    20 (默认项目号11的上个月数据)

......



Top
蒋元根 发表于：2010-08-05 21:10:41

使用满足二个条件的DLookup函数:供参考

 

Private Sub cost_Click()

Me.[cost] = DLookup("cost", "查询上月", "[Project number]='" & Me.[Project number] & "' and [plan/FC]='" & Me.[plan/FC] & "'")
End Sub

点击下载此附件

Top
lyj 发表于：2010-08-07 21:48:03
谢谢，这个问题已解决

Top
总记录：15篇  页次：1/1 9 1 :

Access软件网 版权所有 CopyRight 2006-2030
上海盟威软件有限公司 提供支持
沪ICP备12024966号-4