Чтение данных из Excel-файла. - Pascal ABC

Узнай цену своей работы

Формулировка задачи:

Подскажите, пожалуйста, каким образом чтитывать данные из excel-таблиц? Пытаясь сделать данным образом:
получаю:
РПаЎ±б
Заранее спасибо.

Решение задачи: «Чтение данных из Excel-файла.»

textual
Листинг программы
program SimpleExcel;
 
#apptype windows
#reference 'System.Windows.Forms.dll'
#reference 'Microsoft.Office.Interop.Excel.dll'
 
uses 
  System,
  System.Windows.Forms,
  Microsoft.Office.Interop;
 
var
  app: Excel.Application;
  ws: Excel.Worksheet;
begin
  app:=new Excel.ApplicationClass();
  app.Visible:=false;
  app.Workbooks.Open('D:\Библиотека\Лингвистика\Программы и словари\Excel.xls', System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing);
  ws:=app.Workbooks[1].Worksheets[1] as Excel.Worksheet;
  //ws.Cells[1, 1]:='test';
  MessageBox.Show((ws.Cells[1, 1] as Excel.Range).Value2.ToString()); // Необходимо задать значение, иначе ошибка
  app.Quit();
end.

Объяснение кода листинга программы

  1. Создается новый экземпляр класса Excel.ApplicationClass.
  2. Открывается файл Excel.xls в скрытом режиме.
  3. Получается первый лист первого рабочего книги.
  4. Выводится значение ячейки A1 (по умолчанию, если не указано другое) с помощью метода MessageBox.Show().
  5. Применяются методы Quit() для закрытия приложения Excel.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

11   голосов , оценка 4.091 из 5