Excel VBA - 关闭JMP数据表<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />我正在尝试关闭通过Excel VBA宏打开的JMP数据表“。
Excel VB编辑器成功编译了我的代码(见下文)。
但是,当我运行它时,我得到运行时错误“对象不支持命名参数”。
JMP Automation Reference描述了Document对象的Close方法,如下所示:
关闭(SaveChanges as Boolean,FileName As String)
关闭文档。SaveChanges为用户提供了为文档的最终保存指定不同文件名的选项。如果SaveChanges为true,则将FileName设置为要保存文档的文件的路径和名称。如果要保存到现有文档,建议使用Save方法。
请注意,我没有看到DataTable对象的Close方法。
有什么我想念的吗?
“------------------------------------
Sub CloseDT()
昏暗的应用程序作为JMP.Application
Dim doc As JMP.Document
Dim dt作为JMP.DataTable
'启动JMP
设置app = CreateObject(“JMP.Application”)
app.Visible = True
'打开DT
设置doc = app.OpenDocument(“C:\ Program Files \ SAS \ JMP \ 11 \ Samples \ Data \ Big Class.jmp”)
设置dt = doc.GetDataTable
dt.Activate
'修改DT
“**********
'保存并关闭DT
doc.Close saveChanges:= True,Filename:=“C:\ Program Files \ SAS \ JMP \ 11 \ Samples \ Data \ Big Class.jmp”
结束子
Re:Excel VBA - 关闭JMP数据表好的,我想出了VB语法。我用这个替换了最后一行:
'保存存档
doc.SaveAs“C:\ Program Files \ SAS \ JMP \ 11 \ Samples \ Data \ Big Class.jmp”
'关闭文件
doc.Close False,“”