如何将数据集/查询表转换为OLE对象?

时间:2009-07-17 12:32:13

标签: ms-access vba automation

我有一些VB会自动将OLE对象复制到PowerPoint中。这样做的目的是我的数据库运行查询,然后将表单转换为图表。当它在打开/关闭事件中运行各种queires / form时,图表将被添加到powerpoint演示文稿中。

我也有并行查询以数据表的形式显示结果数据,我想知道是否有办法将其转换为OLE对象(如图表),以便我可以让这个东西自动将这些添加到powerpoint to0。

基本的想法是,我正在复制并粘贴到每个相对幻灯片的powerpoint的notes部分(图表w / data),我想知道是否有更好的方法来做它?

我问这个“OLE想法/方法”的原因是OLEobject = copy是我能够让这个东西自动化它的powerpoint方面的唯一方法(或者,这是我知道如何的唯一方式这样做。)

任何建议总是受到赞赏!

1 个答案:

答案 0 :(得分:1)

我猜你可以使用这样的代码:

DoCmd.OpenForm "FormName", acFormDS

DoCmd.RunCommand acCmdSelectAllRecords

DoCmd.RunCommand acCmdCopy

然后将其粘贴到PowerPoint中。

另一种选择是打开一个记录集对象并在单元格中构建一个填充表。

请参阅此MSDN link with an example