我想把QTP的日志写到ExCEL里面谁知道怎么能让它跳到到第二列

zx198774

我想把QTP的日志写到ExCEL里面谁知道怎么能让它跳到到第二列。谢谢，请高人指点

cbb1982211

Set xlApp = CreateObject("Excel.Application")
Set wkBook = xlApp.Workbooks.Open("e:\测试.xls")
Set wkSheet = wkBook.Worksheets("Sheet1")

wksheet.cells(i,j)="bbbb"         '写入第I行J列  具体的 你可以for循环
          '''''''''''''''''''''以下是保存并退出
xlapp.activeworkbook.save
xlapp.quit
Set xlapp=nothing