The technique to accomplish this involves installing the Office Web Components add-in. Furthermore, you just need to configure a few things inside of the Office application that you want to use to import the data, and you’re ready to start automating your reporting work. I’ve covered some of the elements that we’re going to use in this article in previous VBA articles script.
我将向您展示的是如何将Office Web Components与文本文件脚本结合起来,以从计算机上的纯文本文件创建无缝,自动化的数据流到Office产品(在我们的示例中为Excel) 。您可以在Word,Outlook甚至PowerPoint中使用相同的技术-进行一些小的修改。具有开发人员VBA后端的任何Office产品(或与此有关的任何其他产品)都将允许您使用此技术。
导入并从数据文件中创建图形
从数据文件创建图形之前,您需要首先启用一些功能。在此示例中,我将向您展示如何在Excel中启用这些功能,但是在其他所有Office产品中的过程几乎都是相同的。
首先,在进行任何VBA开发之前,您需要启用工具栏中的“开发者"标签(如果尚未启用)。为此,只需进入“选项"菜单,单击“自定义功能区"并启用“开发人员"选项卡。
回到Excle,您现在会看到菜单中显示“开发人员"。单击它,然后单击“设计模式"。然后单击“查看代码"以查看VBA编辑器。
在编辑器中,您将需要启用我要提供给您的代码的引用。 。在执行此操作之前,请确保已安装Office Web Components加载项,否则Microsoft Chart对象将不可用。
我们终于可以开始工作了。这是嵌入到电子表格中的MS Web组件图表。嵌入到Word文档中或其他任何内容中看起来都一样。
这段代码基本上遍历了数据文件两次-第一次确定数组的尺寸,以便它们是存储所需的确切长度数据,然后第二次将数据读取到这些数组中。如果您不知道数组是什么-它是一个变量或存储区,将包含一长串值,您可以使用将值存储在数组中的顺序来访问它们。例如,加载的三分之一将是(3)。
现在,您已经在其中两个数组中加载了数据文件中的所有值,您就可以将这些值加载到图表中了您已经嵌入的。这是执行此操作的代码。
是“ Sheet1.MyChart",它将代码连接到您已嵌入的实际图表。它基于您的命名。当您将其嵌入到Word,Powerpoint或任何其他Office产品中时,就是这种情况。您不会使用“ Sheet1"来引用它,而是在这种情况下包含图表的任何元素,例如Word中的“ document1"。
该数据直接来自文本文件。唯一的缺点是,仅当您要使用上面的代码时,数据文件才需要是二维的。您可以向数据集添加更多值,但是您需要修改上面的代码以在每次循环中读入第三个值,然后复制“ SeriesCollection.Add"部分以创建另一个系列,然后添加它
只是阅读上面的代码,这似乎很复杂,但是一旦您完成了其中的一项,就可以根据您的需要进行修改。您可以使用相同的图表和类似的代码来创建条形图,散点图或想要使用同一对象的任何其他图表类型。它具有多功能性和灵活性,并且如果您是自动化的忠实拥护者,可以提高生产力,那么它就是您的工具库中的强大工具。
试用上面的代码,看看是否可以将数据自动加载到您的工具中应用程序。您可以为这种类型的自动化考虑什么创意用途?在下面的评论部分中分享您的想法和反馈!
标签: Microsoft Excel Microsoft PowerPoint Microsoft Word