VPF::Создание файла Excel в Delphi - Форум программистов

Nymph666

Дата 21.9.2011, 07:46 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 25
Регистрация: 28.11.2007

Репутация: нет
Всего: нет

Доброго времени суток.
Ребят, мне необходимо также создать файл Excel, а затем его открыть и записать туда информацию из StringGrid.
В уже существующие файлы писать получается, но когда создаю(как раз также как тут написано) и пытаюсь открыть этот файл Excel выдает ошибку "Не удается открыть файл, так как формат или расширение этого файла являются недопустимыми. Убедитесь, что файл не поврежден и расширение его имени соответствует формату"

Код


Save_file:=CreateOleObject(ExcelApp);
Save_file.Visible:=False;
Save_file.Workbooks.Add;
name_file := 'Journal'+Main.CB_Subject.Text+Main.Month_CB.Text+'.xls';
Save_file.Save(ExtractFilePath(Application.ExeName)+name_file);
VFN_s := ExtractFilePath(Application.ExeName)+name_file;
Save_file.Workbooks.Open(VFN_s,ReadOnly:=false);
Save_file.Application.EnableEvents:=false;
workbook_s:=Save_file.workbooks.Open(VFN_s,ReadOnly:=false);
sheet_s:= workbook_s.ActiveSheet;

С чем это может быть связано?

Добавлено @ 07:50
Поняла, что дело все именно в методе Save.
Ту же ошибку выдает Excel при обычном открытии: "формат или расширение этого файла являются недопустимыми. Убедитесь, что файл не поврежден и расширение его имени соответствует формату"
То есть при сохранении создается(а он создается там где я указываю и внешне похож), но при открытии ругается.
Другие, созданные "обычным" способом открывает без проблем.

Это сообщение отредактировал(а) Nymph666 - 21.9.2011, 07:52

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: ActiveX/СОМ/CORBA \| Следующая тема »