[Maks19]

А если нужно получить несколько значений из x строк и y столбцов числовых данных?

Код:

ExcelApp := CreateOleObject('Excel.Application');
  ExcelApp.Workbooks.Open('C:\Pro\1.xlsx');
x := ExcelApp.ActiveCell.Row;
 y := ExcelApp.ActiveCell.Column;
for i:=1 to yy do
   for j:=1 to xx do
   Mas[i,j]:=ExcelSheet.Cells[i, j];

Возникает ошибка. В какой момент нужно конвертировать?