Пакетное конвертирование doc в docx с сохранением атрибутов - Страница 2

Старая форма входа

Страница 2 из 2 « 1 2
Модератор форума: _Boroda_, китин

Пакетное конвертирование doc в docx с сохранением атрибутов

SLAVICK

Дата: Понедельник, 15.02.2016, 16:14 | Сообщение № 21

Группа: Модераторы

Ранг: Старожил

Сообщений: 2290

Репутация: 766 ±

Замечаний: 0% ±

2019

Цитата Didrou, 15.02.2016 в 11:27, в сообщении № 19

Что если среди *.doc файлов будут некоторые с макросами, которые по уму надо бы сохранить не в *.docx, а в *.docm.

Так может сохранять все в *.docm

. Или принципиально такое деление?
Иначе придется заглядывать в модули и смотреть наличие макросов - это еще кусок работы

Иногда все проще чем кажется с первого взгляда.

Сообщение отредактировал SLAVICK - Понедельник, 15.02.2016, 16:16

Ответить

Didrou

Дата: Понедельник, 15.02.2016, 16:28 | Сообщение № 22

Группа: Пользователи

Ранг: Новичок

Сообщений: 30

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Закончил конвертировать копию рабочей папки. Ошибок, недочетов нет! :)

krosav4ig, спасибо тебе труд.

п.с. Можно-ли как-то проверить наличие макросов в *.doc, чтобы такие файлы уже по другому конвертировать, или отдельную тему лучше создать?

Ответить

Didrou

Дата: Понедельник, 15.02.2016, 16:30 | Сообщение № 23

Группа: Пользователи

Ранг: Новичок

Сообщений: 30

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Цитата SLAVICK, 15.02.2016 в 16:14, в сообщении № 21

Так может сохранять все в *.docm . Или принципиально такое деление?
Иначе придется заглядывать в модули и смотреть наличие макросов - это еще кусок работы

Можно-то можно, но лучше визуально по расширению разделить макро файлы от обычных.

Ответить

krosav4ig

Дата: Понедельник, 15.02.2016, 16:41 | Сообщение № 24

Группа: Друзья

Ранг: Старожил

Сообщений: 2347

Репутация: 997 ±

Замечаний: 0% ±

Excel 2007,2010,2013

Цитата Didrou, 15.02.2016 в 16:28, в сообщении № 22

Можно-ли как-то проверить наличие макросов

вместо [vba]

Код

strNewFilePath = Left(.FullName, InStrRev(.FullName, ".")) & "docx"

[/vba] написать [vba]

Код

strNewFilePath = Left(.FullName, InStrRev(.FullName, ".")) & "doc" & IIf(.HasVBProject, "m", "x")

[/vba]

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Ответить

Didrou

Дата: Вторник, 16.02.2016, 08:23 | Сообщение № 25

Группа: Пользователи

Ранг: Новичок

Сообщений: 30

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Всё, krosav4ig, программа полностью удовлетворяет задаче, даже с дополнением:) Спасибо!

Сообщение отредактировал Didrou - Вторник, 16.02.2016, 08:31

Ответить

reoms

Дата: Пятница, 15.09.2017, 09:51 | Сообщение № 26

Группа: Пользователи

Ранг: Прохожий

Сообщений: 3

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Всем привет, а можно ли скриптом сделать пакетное преобразование xls в xlsx?

Ответить

_Boroda_

Дата: Пятница, 15.09.2017, 10:03 | Сообщение № 27

Группа: Админы

Ранг: Местный житель

Сообщений: 16714

Репутация: 6503 ±

Замечаний: ±

2003; 2007; 2010; 2013 RUS

Прочитайте Правила форума. Создайте свою тему

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

Ответить

Пакетное конвертирование doc в docx с сохранением атрибутов

Страница 2 из 2
«
1
2