VB Automation连接到第一个数据表您好,我正在尝试打开一个excel文件作为数据表,然后打开另一个已经存在的数据表。然后我想将新数据表连接到第一个数据表,替换第一个数据表。在JMP中使用concatenate时这是一个选项,但我在自动化文档中找不到它。下面的代码用于打开两个数据表并将它们连接起来以创建一个新的数据表,但理想情况下我想连接到主数据表。我可以保存它,但我不喜欢那个解决方案。这可能吗?
对我的方法的任何其他批评也是受欢迎的。
Sub Main()
Dim MyJMP作为JMP.Application
Dim JMP_Doc作为JMP.Document
Dim Excel_Import作为JMP.DataTable
Dim Master作为JMP.DataTable
设置MyJMP = CreateObject(“JMP.Application”)
MyJMP.Visible = True
设置JMP_Doc = MyJMP.OpenDocument(“Path1”)
设置Excel_Import = JMP_Doc.GetDataTable
设置JMP_Doc = MyJMP.OpenDocument(“Path2”)
设置Master = JMP_Doc.GetDataTable
调用Excel_Import.AddToConcatList
调用Master.AddToConcatList
Master = Master.Concatenate
结束子