0

我已经使用 Access 大约一年了，最近才开始学习 VBA。我读过的书和我在网上读过的帮助似乎不太适合我的需要；或者如果他们这样做，那么我一定是太新手了，无法注意到。

我的项目是一个个人财务数据库，我正在研究一种预测现金流的方法。我有

  1. 一个名为“tbl_InitialPoint”的包含重复交易的表（包含列描述、金额和频率（以天为单位）），

  2. 在“tbl_Register”中查找特定描述的最后日期的查询，

  3. 一个附加查询，用于将重复事务从“tbl_InitialPoint”插入到“tbl_Register”

    INSERT INTO tbl_Register ( PostDate, Description, Amount ) SELECT qry_MaxDate.LastDate + tbl_InitialPoint.Frequency AS DateSeries, tbl_InitialPoint.Description, tbl_InitialPoint.Amount FROM tbl_InitialPoint INNER JOIN qry_MaxDate ON tbl_InitialPoint.Description = qry_MaxDate.Description WHERE qry_MaxDate.LastDate + tbl_InitialPoint.Frequency < = [表格]！[主页]！[日期范围]；

我不知道运行/循环此查询 x 次直到查询为空或为空的特定 vba。

有任何想法吗？

4

1 回答 1

0

我在这里假设您使用的是本地访问表和相应的 DAO 对象。

您必须使用该queryDef对象及其execute方法。

一旦执行了 querydef，您就可以测试您的实例的recordsAffected属性。queryDef

如果此值等于 0，这将意味着没有通过您的查询插入任何记录。

编辑：根据您的评论，您可以在此处queryDef看到一些相关代码，您可以在其中创建新的 querydef 并列出对象的属性，包括属性。recordsAffected

于 2013-10-01T03:45:33.823 回答