oExcel := ComObjActive("Excel.Application")
for Item in oExcel.workbooks
{
data .= "Name:`t"oexcel.workbooks(A_index).FullName "`n"
oexcel.ActiveWindow.Caption := oexcel.ActiveWorkbook.FullName
filename:=Item.FullName
IfInString,filename,Test.xlsx
{
count:=Item.Sheets.Count
loop,%count%
{
name .= Item.Sheets(A_index).name "`n"
}
MsgBox %name%
}
}
oexcel.Worksheets("Sheet2").Select
objRelease(oExcel)