如何从访问报告

时间:2016-04-04 20:08:22

标签: access-vba ms-access-2010 ms-access-2007

我有一个包含多个字段和记录的表格,我创建了一个表单和报表。现在,我希望:

  1. Excel sheet1 表中可用的所有记录
  2. 在下一个工作表上我只想要那些在下周和即将到来的月份到期的项目,
  3. 在下一个工作表上,我想要重要或高严重性的项目。
  4. 我尝试过分页和分组,但数据显示在Excel的同一工作表中。如何将数据存储在同一工作簿的单独工作表中?

1 个答案:

答案 0 :(得分:1)

我已创建以下内容来代表您的Access表:

enter image description here

然后我创建了一个月内到期项目的查询:

enter image description here

SELECT tblItems.ItemID, tblItems.ItemDescription, tblItems.DueDate, tblItems.Importance
FROM tblItems
WHERE tblItems.DueDate<DateAdd("m",1,Now());

...然后对高重要项目的另一个查询:

enter image description here

SELECT tblItems.ItemID, tblItems.ItemDescription, tblItems.DueDate, tblItems.Importance
FROM tblItems
WHERE (((tblItems.Importance)="High"));

这为我们提供了3个数据集,可以在单独的工作表中链接到Excel工作簿。

在Excel工作簿的 Sheet1 中,您需要所有记录,您可以转到数据标签,然后转到获取外部数据组,单击从访问按钮:

enter image description here

在对话框窗口中,导航到包含数据集的Access文件,然后单击“打开”。

然后,您应该获得可供您链接的表/查询列表。对于所有记录工作表( Sheet1 ),我们可以链接到tblItems,因为它包含此示例中的所有记录:

enter image description here

Excel将询问您如何查看数据(表格会很好)以及您希望放置数据的位置( Sheet1 中的单元格A1会很好):

enter image description here

然后,这应该将Access中的数据导入Excel工作簿:

enter image description here

然后,您可以分别为其余2个查询重复 Sheet2 Sheet3 的上述步骤:

Sheet2 - 1个月内到期的项目:

enter image description here

Sheet3 - 重要的项目:

enter image description here

如果您在Access中更改了任何此类数据,则可以通过再次转到数据选项卡并单击全部刷新来轻松查看Excel中的这些更改:

enter image description here