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)
服务器托管,北京服务器托管,服务器租用 http://www.fwqtg.net
机房租用,北京机房租用,IDC机房托管, http://www.e1idc.net