Как узнать количество занятых строк и столбцов в Excel

Автор: Квасницкий Константин
WEB-сайт: www.bpressa.ru

var
  MyExcel: Variant;
  Rows, Columns: Integer;
begin
  MyExcel := CreateOleObject('Excel.Application');
  MyExcel.WorkBooks.Open('ExcelFileName');
  Rows := MyExcel.ActiveSheet.UsedRange.Rows.Count;
  Columns := MyExcel.ActiveSheet.UsedRange.Columns.Count;