excel如何写入数据到表sheet2？总是写到sheet1中去。

'写Excel文件
Set excel_sheet = MyXlsApp.Workbooks.Open("C:\Users\Admin\Desktop\Book1.xlsx")
MyXlsApp.Visible = False
Set xlSheet = excel_sheet.Worksheets(1)     '其中的数字为几都为第一个表sheet1
'Set xlSheet = excel_sheet.Worksheets("Sheet2")   '其中的数字为几都为第一个表sheet1，表名称为中文时指定有效

已解决

excel_sheet.Worksheets(2)
excel_sheet.Worksheets("Sheet2")

前题得要有sheet2哈，可以加个判断

public xlapp as excel.application
public xlbook as excel.workbook
public xlsheet as excel.worsheet
pubic xlrng as excel.range
set xlapp=createobject("excel.application")
set xlbook =xlapp.workbooks.open("文件名")
set xlsheet=xlbook.worksheets(2)
set xlrng=xlsheet.range("a2")
xlrng="abc"