Сообщить(appExcel.WorkSheets(1).UsedRange.Row);   

 LastRow=ExcelApp.Cells(1,1).SpecialCells(11).Row;   

 Сообщить(appExcel.WorkSheets(1).UsedRange.Columns);   

 LastCol=ExcelApp.Cells(1,1).SpecialCells(11).Columns;