发布于 2011-10-13 21:14:15
16楼
for i=3 to xlsheet.range("A65536").end(3).row
i=i+1
x1sheet.cell(i,1).value=ScreenItems("wincc上输入输出域的名称”).outputvalue
next
改成
x1sheet.cells(xlsheet.range("A65536").end(3).row +1,1).value=ScreenItems("wincc上输入输出域的名称”).outputvalue