Чтение данных из 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.
Объяснение кода листинга программы
- Создается новый экземпляр класса Excel.ApplicationClass.
- Открывается файл Excel.xls в скрытом режиме.
- Получается первый лист первого рабочего книги.
- Выводится значение ячейки A1 (по умолчанию, если не указано другое) с помощью метода MessageBox.Show().
- Применяются методы Quit() для закрытия приложения Excel.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д