VBS导出变量记录如何把分开导入到excel

sSql = "Tag:R,(tag1,tag2)导出后都是在EXCEL同一列显示,现在想把多个变量分为不同的列导出到EXCEL ,如何用VBS脚本实现改功能?
求大神解答,谢谢!

最佳答案

用循环就可以拉,也有用do循环:

 objRs.movefirst  ‘数据记录移动至首行

For k = 1 To 10  ''假设打印10列
  For i = 1 To 100 ‘打印100行
     If Not objRs.EOF Then  ''EOF为true就是sql返回数据已经movenext到底部了。没了
        Sheet1.Cells(m , n) = objRs.Fields(2).Value ’sheet1的单元格(m,n)m是行,n是列的交叉位置单元格。Fields(2)是根据你select返回的数据自己定义,我的例子要是sql返回的第2列的值,
       objRs.movenext ‘ sql返回的数据记录移动到下一行
     End If
  Next ''当前行打印完毕
Next ’切换到下一列

提问者对于答案的评价:
谢谢你,但是查询sql的语句如何表达,能否详细说明一下?

原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc189506.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2017年7月30日 上午11:11
下一篇 2017年7月30日 上午11:11

相关推荐