各位高手，我在学习WINCC的EXCEL报表，
各位高手，我在学习WINCC的EXCEL报表，在WINCC的脚本里做，感到没有反应，就先在VB6.0中作，但是会提示错误：实时错误13，类型不匹配，点调试按钮提示Set VBExcel = CreateObject("Excel.Application")有错，我做个几次，都是这句有问题，
语句如下：
Private Sub Command5_Click()
Dim VBExcel As Excel.Application
Set VBExcel = CreateObject("Excel.Application")
With VBExcel
.Workbooks.Add
With ActiveWorkbook
.SaveAs "D:\sample.XLS"
.Close
End With
.Quit
End With
End Sub
请指教！！！
最佳答案
我用你这个在VB6中复制再粘贴，没有更改！完全可以实现结果：在D盘，保存一个EXCEL文件sample.XLS
问题应该不是这一段程序，你看看是不是其他写入EXCEL时产生的错误。
提问者对于答案的评价：
谢谢！我试了下又对了！
原创文章，作者：ximenziask，如若转载，请注明出处：https://www.zhaoplc.com/plc361187.html
微信扫一扫 
支付宝扫一扫 