Перед закрытием выскакивает:"Предупреждение о конфедициальной информаци"

Пользователь

Сообщений: 16 Регистрация: 01.01.1970

02.05.2012 15:57:16

Добрый день! Запускаю макрос (открывает файл вносит туда в ячейку значение, сохраняет и закрывает файл), и перед закрытием выскакивает: " Предупреждение о конфедициально информации: документ содержит макросы ..." И прихожиться все время нажимать ОК. Можно ли как то в макросе прописать чтоб он сам ОК нажимал, а лучше чтоб предупреждение вообще не выскакивала?

NullUzer

Гость

02.05.2012 16:04:40

Excel 2007/2010
Файл/Кнопка Офиса -> Параметры/Параметры Excel -> Центр управления безопасностью -> Параметры макросов -> Включить все макросы

P.S. По необходимости можно поставить галку "Доверять доступ к объектной модели проектов VBA".

Guest

Гость

02.05.2012 16:25:06

{quote}{login=NullUzer}{date=02.05.2012 04:04}{thema=}{post}Excel 2007/2010
Файл/Кнопка Офиса -> Параметры/Параметры Excel -> Центр управления безопасностью -> Параметры макросов -> Включить все макросы

P.S. По необходимости можно поставить галку "Доверять доступ к объектной модели проектов VBA".{/post}{/quote}

Сделал все как вы сказали, и галочку поставил, все равно выскакивает сообщение

NullUzer Гость	#4 02.05.2012 16:31:23 Попробуйте включить "Параметры ActiveX" и "Внешнее содержимое".

Guest Гость	#5 02.05.2012 16:59:20 {quote}{login=NullUzer}{date=02.05.2012 04:31}{thema=}{post}Попробуйте включить "Параметры ActiveX" и "Внешнее содержимое".{/post}{/quote} Включил "Параметры ActiveX" и "Внешнее содержимое", все равно выскакивает предупреждение!

Guest Гость	#6 02.05.2012 17:12:17 Сбейте галку: Прикрепленные файлы post_331456.jpg (39.71 КБ)

NullUzer

Гость

02.05.2012 17:24:30

Нашёл! У меня тоже есть такая книга с такой же проблемой, просто я забил на неё!
А вот что надо сделать:
1. Разархивировать содержимое файла.
2. Найти файл workbook.xml: "xl/workbook.xml".
3. Открыть этот XML файл и найти в нём тэг "workbookPr".
4. Удалить атрибут "filterPrivacy" (у меня стояло filterPrivacy="1").

После этого ошибка больше не вылезает! :)

NullUzer Гость	#8 02.05.2012 17:26:02 И самое главное: вставить этот XML-файл обратно в книгу. :)

Guest Гость	#9 02.05.2012 17:42:20 {quote}{login=}{date=02.05.2012 05:12}{thema=}{post}Сбейте галку:{/post}{/quote} У меня офис 2010, и я там не могу найти данных параметров!

Guest

Гость

#10

02.05.2012 17:45:02

{quote}{login=}{date=02.05.2012 05:42}{thema=Re: }{post}{quote}{login=}{date=02.05.2012 05:12}{thema=}{post}Сбейте галку:{/post}{/quote}
У меня офис 2010, и я там не могу найти данных параметров!{/post}{/quote}
Спасибо большое!!! Все получилось! Очень приятно, что Помогаете!

KuklP Пользователь Сообщений: 14868 Регистрация: 21.12.2012 E-mail и реквизиты в профиле.	#11 02.05.2012 18:22:55 Можно проще, это уже не раз обсуждалось. Для 2010 см. картинку(убрать галку). Прикрепленные файлы post_331481.gif (39.03 КБ) Я сам - дурнее всякого примера! ...

WaVe3 Пользователь Сообщений: 16 Регистрация: 01.01.1970	#12 04.05.2012 11:37:15 У меня очень много файлов и в каждом убирать галку я не могу

Юрий М Модератор Сообщений: 61088 Регистрация: 14.09.2012 Контакты см. в профиле	#13 04.05.2012 11:38:26 Снять/поставить эту глаку можно программно. Вот что записал мой макрорекордер: Sub Макрос1() ActiveWorkbook.RemovePersonalInformation = False End Sub Если у Вас много таких файлов, то нужно будет макросом перебрать все эти файлы и выполнить с каждым всего одну операцию. Вопросы перебора файлов на форуме рассматривались неоднократно.

Читают тему