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,“”