VB6.0处理WPS个人免费版代码

VB6.0操作WPS个人版2019

VB6.0处理WPS个人版代码

关键字:
VB6.0控制WPS个人版
VB6.0写入WPS
VB处理WPS表格
VB6.0操作WPS个人版

网上搜索了很久VB6.0操作WPS的问题，很多测试不成功，测试以下代码可以实现WPS PC 2019个人免费版(不含VBA组件)的处理，未测试其他方法属性处理是否与微软一致。
测试环境Windows10专业版+WPS2019个人PC版V11.1.0.9584

在这里插入代码片
Private Sub Command1_Click()
        Set xlApp = CreateObject("ket.Application")  '后期绑定WPS，测试win10专业版+WPS2019个人PC版-V11.1.0.9584
        '网上查询说et.Application及excel.Application也能，但我测试都会提示错误
        Set xlBook = xlApp.Workbooks.Open(App.Path & "\" & "