excel表格数据整理

objExcel := ComobjCreate(“Excel.Application”)
file1 = 项目统计表(2022年）.xlsx
s_sheet = 2022年月统计

FileName = %A_ScriptDir%\%file1% 
objworkbook:= objExcel.workbooks.open(FileName)
objExcel.visible := true
objworkbook.WorkSheets.Add
i=1
j=1

loop 500
{  
  tmp3 := objworkbook.sheets(s_sheet).cells(i,1).value
  if (tmp3 is float)
  {
    tmp1 := objworkbook.sheets(s_sheet).cells(i,2).entirerow.value
    objworkbook.sheets(1).cells(j,1).entirerow.value := tmp1
    j++
  }
  i++
}
return