FilePath := "C:\Книга.xlsx"
oWorkbook := ComObjGet(FilePath)
MsgBox % oWorkbook.Sheets(1).Range("A1").Value ; здесь колонку "А" ячейку 1 считывает

filepath := ("C:\Книга1.xlsx")
objExcel := ComObjCreate("Excel.Application")
objExcel.Visible := true
WorkBook := objExcel.Workbooks.Open(filepath)
for connection in WorkBook.Connections
{
   if (connection.type = 1)
      connectionType := connection.OLEDBConnection
   else if (connection.type = 2)
      connectionType := connection.ODBCConnection
   else
      msgbox % "error connectionType - " connection.type
   if (connectionType.RefreshOnFileOpen = -1)
      connection.Refresh
}
objExcel.CalculateUntilAsyncQueriesDone
msgbox done

 
Run, G:\....xls
sleep 10000
objExcel := ComObjActive("Excel.Application")
d := ""
loop
{
     d .= objExcel.Range("B" . 6).value
}
msgbox % d