注册 登录
编程论坛 VB6论坛

excel如何写入数据到表sheet2?

yuma 发布于 2022-10-22 21:24, 1531 次点击
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,表名称为中文时指定有效

3 回复
#2
yuma2022-10-22 21:47
已解决

excel_sheet.Worksheets(2)
excel_sheet.Worksheets("Sheet2")
#3
约定的童话2022-10-23 07:12
前题得要有sheet2哈,可以加个判断
#4
zpguoyuchang2022-11-18 09:07
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"
1