Реклама на этом месте
Форум 1С
Форум 1С
Программистам. Бухгалтерам. Администраторам. Пользователям
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
15 Дек 2017, 23:04
МультиВход
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?
 
collapse

Автор Тема: Выгрузка в Excel из 1С  (Прочитано 11063 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн beginner1

  • *
  • Сообщений: 12
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2013-10-03
  • Сайт: 
  • Профессия: Программист 1С
Добрый день! Подскажите, пожалуйста! делаю выгрузку из 1С в Ексель с группировками строк. На лист программно устанавливается защита.
Лист.EnableOutlining = Истина;
Лист.Protect("123",Истина,Истина,Истина,Истина);
Книга.Protect("123");
Запускаю ексель
Excel.Visible = 1;
Группировки работают. Сохраняю файл на диск, открываю заново, группировки перестают работать. Как побороть?

 


Оффлайн MuI_I_Ika

  • Гончаров Михаил
  • Администратор
  • *****
  • Сообщений: 6558
  • РЕПУТАЦИЯ: 775
  • КПД: 12%
  • Регистрация: 2012-08-15
    • Skype: MuI_I_Ika
  • Сайт: 
  • Профессия: Программист 1С
Может быть проблема с форматами экселя. С каким расширением сохраняется файл?

Оффлайн beginner1

  • *
  • Сообщений: 12
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2013-10-03
  • Сайт: 
  • Профессия: Программист 1С
   Excel = Новый COMОбъект("Excel.Application");
   ВременнаяПапка = СоздатьВременнуюПапку();    
   ПутьКФайлу = ВременнаяПапка + "\" + "Price" + Формат(Период, "ДФ=ггггММдд") + ".xls";

Оффлайн mixqn

  • Администратор
  • *****
  • Сообщений: 1346
  • РЕПУТАЦИЯ: 166
  • КПД: 12%
  • Who is John Galt?
  • Регистрация: 2012-08-15
  • Сайт: 3gmaster.net
  • Профессия: Программист 1С
а как конкретно создаются группировки?
правильно я понимаю, порядок действий такой:
1. программно создан файл
2. программно заполнен
3. программно открыт
4. вручную сохранен
до пункт 4 все работает, пункт 4 - не работает, так?

Оффлайн beginner1

  • *
  • Сообщений: 12
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2013-10-03
  • Сайт: 
  • Профессия: Программист 1С
Все верно!
Лист.Range(Лист.Cells(НачСтрока, 1), Лист.Cells(НомерСтроки - 1, 9)).Rows.Group();
Вручную сохранен, файл повторно открыт, группировки не работают на защищенном листе.
Без защиты не обойтись.

Оффлайн mixqn

  • Администратор
  • *****
  • Сообщений: 1346
  • РЕПУТАЦИЯ: 166
  • КПД: 12%
  • Who is John Galt?
  • Регистрация: 2012-08-15
  • Сайт: 3gmaster.net
  • Профессия: Программист 1С
группировки не работают на защищенном листе
а кстати, по-моему именно в этом корень проблемы. я как-то не придал сначала значения этому.
если не ошибаюсь, делал тоже раньше лист с защитой - от группировок пришлось отказаться, они не работают вроде.

предлагаю:
1. проверить полностью в ручном режиме (исключить 1С вообще - создать документ и "поиграться")
2. поискать в интернете, может как-то можно добиться нужного эффекта.

подозреваю, придется делать выбор: либо защита либо группировки

Оффлайн beginner1

  • *
  • Сообщений: 12
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2013-10-03
  • Сайт: 
  • Профессия: Программист 1С
Да проблема именно в этом. Я читала, что обходится это только написание макроса. Если написать вручную макрос, то все работает. Если попытаться программно записать макрос:
Excel.VBE.ActiveVBProject.VBComponents(1).CodeModule.AddFromString("Private Sub Workbook_Open()" +
Символы.ПС + "Worksheets(""Прайс"").Unprotect ""123"" +
Символы.ПС + "Worksheets(""Прайс"").EnableOutlining = True" +
Символы.ПС + "Worksheets(""Прайс"").Protect ""123"" contents:=True, userInterfaceOnly:=True " +
Символы.ПС + "end sub");
Но к сожалению происходит ошибка
{Форма.Форма(528)}: Ошибка при получении значения атрибута контекста (VBE): Произошла исключительная ситуация (Microsoft Excel): Программный доступ к проекту Visual Basic не является доверенным
Уже морально практически отказалась от группировок, последняя надежда на форум, может, кто-то все-таки решил проблему

Оффлайн mixqn

  • Администратор
  • *****
  • Сообщений: 1346
  • РЕПУТАЦИЯ: 166
  • КПД: 12%
  • Who is John Galt?
  • Регистрация: 2012-08-15
  • Сайт: 3gmaster.net
  • Профессия: Программист 1С
да, вручную не получится...
без кода
Лист.EnableOutlining = Истина;
доступность группировок не работает при установленной защите.
в общем остается один совет: копайте интернет, может еще еще какие свойства у экселя, которые помогу вам решить задачу


Добавлено: 04 Окт 2013, 10:31

Я читала, что обходится это только написание макроса
да, я тоже наткнулся на подобную статью.
видимо и правда не работает.
ошибка
{Форма.Форма(528)}: Ошибка при получении значения атрибута контекста (VBE): Произошла исключительная ситуация (Microsoft Excel): Программный доступ к проекту Visual Basic не является доверенным
должна лечиться так:
Кнопка "Office" -> кн. "Параметры Excel" –> меню "Основные" -> поле "Основные параметры работы с Excel" -> Показывать вкладку "Разработчик" на ленте.
Панель "Разработчик" -> группа "Код" -> Безопасность макросов -> меню "Параметры макросов" -> поле "Параметры макросов для разработчика" -> Доверять доступ к объектной модели проектов VBA.

И после этого перезагрузить.

(опять же, нашел в интернете)

Последний раз редактировалось: mixqn; 04 Окт 2013, 10:31. Причина: Объединение сообщений

Оффлайн beginner1

  • *
  • Сообщений: 12
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2013-10-03
  • Сайт: 
  • Профессия: Программист 1С
Да, я тоже это читала. Но я не пойму, прайс будут выгружать менеджеры и каждому нужно настроить это разрешение для Excel у них на пк и помнить об этом, если вдруг у них будет переустановка офиса. Как-то это не есть гуд. Или я чего-то недопонимаю?

Оффлайн mixqn

  • Администратор
  • *****
  • Сообщений: 1346
  • РЕПУТАЦИЯ: 166
  • КПД: 12%
  • Who is John Galt?
  • Регистрация: 2012-08-15
  • Сайт: 3gmaster.net
  • Профессия: Программист 1С
да, все так.
опять же, с сужу по тому, что прочитал, на практике не пробовал. но судя по тому, что пишут + ваше описание проблемы (то, что без скрипта и правда не работает) наводит на мысль, что иного выхода нет.
так что выбор такой примерно: или защита или структура или каждый раз правка настроек. чем-то неизбежно придется жертвовать (если конечно не существует в природе иного способа, которого мы с вами пока не нашли).


Теги: 1С Excel 
 

выгрузка из "Платежные документы" выборочно в "Бухгалтерию предприятия"

Автор hkvРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 6
Просмотров: 4107
Последний ответ 09 Окт 2014, 15:58
от дфтын
Выгрузка Бух учет из "Зарплаты и управления персоналом 8" в "1С:Бухгалтерию 8"

Автор KazakOFFРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 5
Просмотров: 2424
Последний ответ 10 Ноя 2015, 16:20
от vitasw
Ошибка при загрузке данных через (Обработка "Выгрузка и загрузка данных XML")

Автор Сергей_87Раздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 1
Просмотров: 8570
Последний ответ 26 Апр 2012, 23:08
от Dethmontt
Модуль "выгрузка в банк"

Автор Dima IgnatovРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 3
Просмотров: 946
Последний ответ 11 Май 2016, 13:23
от Rasty
Выгрузка из "Зарплата и кажпы" платеж за три месяца

Автор vlasssov71Раздел Пользователям "1С - Предприятие 8"

Ответов: 2
Просмотров: 1231
Последний ответ 07 Июл 2015, 15:19
от vlasssov71

* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Реклама

* Последние вакансии

* Топ 10 авторов за месяц

Геннадий ОбьГЭС Геннадий ОбьГЭС
180 Сообщений
ilyay ilyay
69 Сообщений
alex0402
54 Сообщений
oleg-x
48 Сообщений
AIFrame
46 Сообщений
andron81_81
44 Сообщений
MuI_I_Ika MuI_I_Ika
33 Сообщений
Golickoff Golickoff
31 Сообщений
BuhRust
30 Сообщений
Dima Dddd Dima Dddd
26 Сообщений

* Кто онлайн

  • Точка Гостей: 223
  • Точка Скрытых: 0
  • Точка Пользователей: 5
  • Точка Сейчас на форуме:

* Облако тэгов

* Форум 1С с мобильного

* Инструменты

* Дополнительно

Поиск

 
SimplePortal 2.3.5 © 2008-2012, SimplePortal