最近想開發個小程式來操作WPS文字，安裝的是WPS2016,參考的是wps object 3.0 library (beta).程式中用下面的陳述句：
Dim wpsApp As Application
Private Sub Command1_Click()
'Set wpsApp = GetObject("WPS.Application")
'Set wpsApp = GetObject("C:\Kingsoft\WPS Office\10.1.0.6554\office6\wpsapi.dll", "WPS.Application")
Set wpsApp = GetObject("wps.Application")
wpsApp.Visible = True
wpsApp.Documents.Open ("C:\1.doc")
End Sub
提示自動化錯誤。請高手指教，謝謝！
uj5u.com熱心網友回復：
Private Sub Command1_Click()
dim wpsApp as new wps.Application
wpsApp.Visible = True
wpsApp.Documents.Open ("C:\1.doc")
End Sub
uj5u.com熱心網友回復：
彈出錯誤，對dim wpsApp as new wps.Application ，說“用戶型別未定義”
uj5u.com熱心網友回復：
會是WPS版本的問題嗎？朋友們有經驗的，還請多指教，感謝 ！uj5u.com熱心網友回復：
你不是已經參考了庫了嗎，打開物件瀏覽器，看看它的物件類名是什么吧。
uj5u.com熱心網友回復：
我在這一步Set xlapp = CreateObject("ET.Application")時，總是提示ActiveX部件不能創建物件uj5u.com熱心網友回復：
wps版本問題，只有政府版、企業版才支持vba互動。個人版不支持。uj5u.com熱心網友回復：
2012版后個人不支持uj5u.com熱心網友回復：
沒建立參考的物件吧 我做過SolidWorks二次開發。添加參考后需要dim一個參考的物件轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/26880.html
標籤：VB基礎類
上一篇：fortran讀寫檔案觸發斷點