|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
09.07.2010, 08:57 | #1 |
Пользователь
Регистрация: 20.01.2010
Сообщений: 53
|
ActiveWorkbook.Close SaveChanges:=True
Здравствуйте, помогите пожалуйста решить такую проблему: есть макрос, он находит в папке *.xls* файлы, выполняет ряд преобразований и сохраняет их, дело в том, что до момента сохранения всё преобразуется правильно, но после выполнения команды ActiveWorkbook.Close SaveChanges:=True я открываю сохранённый файл а в нём не те изменения. В чём тут дело может быть? Заранее спасибо за помощь!
|
09.07.2010, 10:27 | #2 |
Форумчанин
Регистрация: 14.05.2009
Сообщений: 311
|
это конечно загадка (надо разбираться на местах), попробуй разве так
Код:
|
09.07.2010, 12:55 | #3 |
Пользователь
Регистрация: 20.01.2010
Сообщений: 53
|
К сожалению эффекта нет, возможно дело в самом макросе, в приложенном архиве будут файл с макросом и образец файла, который должен им обрабатываться. Обратите внимание на комментарий в 16 строке макроса.
|
09.07.2010, 14:06 | #4 |
Форумчанин
Регистрация: 14.05.2009
Сообщений: 311
|
файл "образец" - какой-то косячный формат (там все делается, но диаграммы не поддерживает), короче, сохраняй его как нормальный файл (я его сохранил как .xlsx)
и еще один момент (чтобы саму книгу "макрос" не цеплял; если конечно она в той же папке) Код:
|
09.07.2010, 14:13 | #5 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
А файл Образец.xls - это текст с другим расширением. То-то я думаю, чего это он в текстовом виде предлагает сохранять, но так и не врубился вначале...
Т.е. вероятно можно сделать типа: ActiveWorkbook.SaveAs Filename:= _ "C:\Documents and Settings\User\Рабочий стол\Образец.xls", FileFormat:= _ xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _ , CreateBackup:=False
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 09.07.2010 в 14:16. |
09.07.2010, 14:55 | #6 |
Пользователь
Регистрация: 20.01.2010
Сообщений: 53
|
Вобщем, если файлы для преобразования сохранять в формате *.xlsx то действительно всё работает, но эти файлы получаются автоматически при выгрузке из нашей программы, причём если их выгружать в формате .xlsx они не открываются вообще, что весьма обидно. Придётся выгружать в .xls, дописывать автоматическое сохранение в формате .xlsx, а макрос-то и так не очень быстрый, мягко говоря...
|
09.07.2010, 16:25 | #7 |
Пользователь
Регистрация: 20.01.2010
Сообщений: 53
|
Всем спасибо, проблема была именно в том что файл сохранялся как текст, я наивно предполагал, что если при выгрузке файла задать расширение .xls, то он выгрузится в формате Excele, и ещё я наивно предпологал, что уж сохраняется всё точно в эксэлевском формате, а оказывается в том что был изначально. Эта строчка всё исправила:
ActiveWorkbook.SaveAs FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False и всё в порядке. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
ShowModal, close!!!! | Ital1cs | Помощь студентам | 3 | 02.04.2010 19:50 |
Open&Close в С++ | sabov | Помощь студентам | 8 | 11.12.2009 23:30 |
activeWorkBook.Close на вылет | tolikman | Microsoft Office Excel | 3 | 05.09.2008 23:43 |
Open Close CD-ROM Door | Nick757 | Общие вопросы Delphi | 1 | 07.08.2007 09:03 |