dynamic激活或select工作表

我dynamic创build一个Excel文件，在JavaScript中使用VBS和ExcelXML。 像这样的东西。

acdbCon.OpenConnection(); rs = acdbCon.GetRecordSet(GetQryABC(a,b,c)); workbookObj = new WorkbookXML("abc"); xmlBody.append(workbookObj.AddWorkbook().join("")); xmlBody.append(workbookObj.AddStyleSheet().join("")); abcObj = new abcXML(xmlBody, rs, PAGE_HEADER, PAGE_SUB_HEADER,.,.,.); xmlBody = abcObj .AddSheet(1, "sheet1"); xmlBody = abcObj .AddBlankSheet(2, "sheet2"); xmlBody = abcObj .AddSheet(3, "sheet3"); xmlBody.append(workbookObj.EndWorkbook()); acdbCon.CloseConnection(); var fileNameDate = new Date(); var fileName=tpInfo.GetDLN() + "_ABC_" + (fileNameDate.getMonth()+1) + "_" + fileNameDate.getDate() + "_" + fileNameDate.getYear(); var fh = fso.CreateTextFile("c:\\doc\\" + fileName + ".xls", true); document.getElementById("export_msg").innerHTML="File Exported to: c:\\doc\\" + fileName + ".xls"; fh.WriteLine(xmlBody.toString()); fh.Close(); var objExcel; objExcel = new ActiveXObject("Excel.Application"); objExcel.Workbooks.Open('c:\\doc\\' + fileName + '.xls',false,false); var wkSh = objExcel.Workbooks(fileName + '.xls').Worksheets("Sheet1"); var rcWkSh = objExcel.Workbooks(fileName + '.xls').Worksheets("Sheet2"); var rcWkSh2 = objExcel.Workbooks(fileName + '.xls').Worksheets("Sheet3"); 

一旦excel被创build并保存，它将被打开以供查看。 我的要求是dynamic激活/select/显示任何我select的工作表打开表。 例如，假设用户希望在打开工作簿时激活sheet3并进行select。

我尝试了以下
objExcel.Workbooks（fileName +'.xls'）。sheets（1）.activate;
objExcel.Workbooks（fileName +'.xls'）。sheets（1）.select（）;
objExcel.Workbooks（fileName +'.xls'）。sheets（1）.Activate;
objExcel.Workbooks（fileName +'.xls'）。Worksheets（“Sheet3”）。Activate;
但没有任何工作。 任何想法，我怎么能做到这一点。 谢谢。

拉维

Answer 1

使用Excelmacros录制器，执行你想在自动化脚本中执行的操作，然后复制logging器生成的代码，并在脚本中使用它。

 Sheets("Sheet2").Select 

Answer 2

以下为我工作：

 Application.Sheets("Sheet2").Activate