wps的word，vba接入wps的代码

以下是使用VBA连接WPS的Word的示例代码：

1. 首先打开WPS的Word，按下Alt+F11打开VBA编辑器；
2. 在VBA编辑器中，选择插入->模块，将下面的代码复制粘贴至模块中；
3. 在代码中修改wps的word文档路径，运行代码。

Sub OpenWPSWord()
    Dim wpsApp As Object
    Dim wpsDoc As Object
    Set wpsApp = CreateObject("KWPS.Application")
    wpsApp.Visible = True
    Set wpsDoc = wpsApp.Documents.Open("C:\Users\XXX\Desktop\test.docx")
End Sub

这段代码通过创建一个WPS应用程序对象，然后打开指定路径的Word文档。

如果想要进行更多的操作，可以通过wpsApp和wpsDoc对象来操作WPS的Word，例如：

Sub InsertText()
    Dim wpsApp As Object
    Dim wpsDoc As Object
    Set wpsApp = CreateObject("KWPS.Application")
    wpsApp.Visible = True
    Set wpsDoc = wpsApp.Documents.Open("C:\Users\XXX\Desktop\test.docx")
    wpsDoc.Range.Text = "Hello WPS!"
    wpsDoc.Save
    wpsDoc.Close
    wpsApp.Quit
End Sub

这段代码在打开指定的Word文档后，将文本插入到文档中，并保存后关闭WPS的Word应用程序。