powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel 95 -> в любой более новый формат
4 сообщений из 4, страница 1 из 1
Excel 95 -> в любой более новый формат
    #34417398
Dark_Scorpion
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть куча файлов, сохранённых в формате excel 95. Необходимо пересохранить все эти файлы в любой более новый формат. Можно конечно вручную открывать в excel эти файлы и заново сохранять. Но это решение не приемлимо. Как это можно сделать автоматически? Либо как написать программу, которая это делала бы автоматически?
...
Рейтинг: 0 / 0
Excel 95 -> в любой более новый формат
    #34418482
Овчарик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А смысл пересохранять когда тебе понадобится этот файл то он откроется сам в той версии с которой ты работаеш
...
Рейтинг: 0 / 0
Excel 95 -> в любой более новый формат
    #34418556
Dark_Scorpion
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
открывать файл прийдётся в OpenOffice - а он умеет работать тока с форматами начиная с excel97.
нужен конвертор которому указываешь папку и он все excel-файлы шерстит.
Думаю алгоритм будет примерно такой:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
  exl_old :=CreateOleObject('Excel.Application');
  exl_old.WorkBooks.Open('c:\temp\file.xls');
  exl_old.Cells.Select;
  exl_old.Selection.Copy;

  exl_new:=CreateOleObject('Excel.Application');
  exl_new.WorkBooks.Open('c:\temp\blank.xls');

  exl_new.ActiveSheet.Paste;
  exl_new.ActiveWorkbook.SaveAs('c:\temp\file_new.xls');

  exl_old := Unassigned;
  exl_new := Unassigned;
Содержимое копируется правильно
Одно НО: ширина столбцов при копировании не сохраняется.
Как сделать так чтобы щирина столбцов при копированиии осталась такая де как в оригинале?
Или всё-таки прийдётся делать цикл в котором присваивать каждому столбцу ширину.
...
Рейтинг: 0 / 0
Excel 95 -> в любой более новый формат
    #34421495
Indian
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Если написать макрос в файле .xls, то в итоге получиться новый файл той версии, которая была в том Excel куда был сохранен макрос, ну и соответсвенно, запущен:
Код: plaintext
1.
2.
3.
4.
Workbooks.Open Filename:="c:\temp\file.xls"
    ActiveWorkbook.SaveAs Filename:="c:\temp\file_new.xls", FileFormat:=xlNormal, _
        Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
        CreateBackup:=False
По крайней мере, попробуй.
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel 95 -> в любой более новый формат
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]