Бухгалтерский учет, налогообложение, отчетность, МСФО, анализ бухгалтерской информации, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

Идентификаторы переменных VBA при 1С & OLE Automation

Thorvardr
читатель
офлайн
Дата регистрации: 25.02.2005
Сообщений: 3077
Пост №1
 
29.04.2009 11:08

"Задачка решена "в лоб", но хотелось бы узнать есть ли более аккуратный метод решения.
Суть задачи: Обрабатывается каталог с гигантским количеством Word документов (договоры, заключенные с клиентами), делается выборка по определенному правилу (файлы именованы особым образом), каждый нужный док открываю через OLE Automation, выдергиваю оттуда первые параграфы, собираю текстовку в таблицу значений, показываю ее пользователю, он выбирает что нужно делать с документом (просмотр, удаление, создание нового как копия имеющегося и т.п.).
Так вот в решении есть узкое место. Открытие для сбора данных идет так:
АнализируемыйWordDocument=WordServer.Documents.Open(ПутьКФайлу+"\"+ФайлДоговора,,-1,,,,,,,,,0);
Реально в VBA Word-а метод Open описан так:

expression.Open(FileName, ConfirmConversions, ReadOnly, AddToRecentFiles, PasswordDocument, PasswordTemplate, Revert, WritePasswordDocument, WritePasswordTemplate, Format, Encoding, Visible, OpenConflictDocument, OpenAndRepair, DocumentDirection, NoEncodingDialog)

Вот загвоздка в том, что в зависимости от версии Word-а аргументы могут быть в другом порядке и нужный Visible может оказаться вовсе не 12-м аргументом. Поэтому в VBA придумана технология, которая позволяет легко обойти эту проблему, а именно, производить открытие таким образом:

Documents.Open FileName:="C:\MyFiles\MyDoc.doc", ReadOnly:=True, Visible:=False

То есть, имеется возможность аргументы перечислять не в скобках через запятые, а обращаться к ним по идентификатору. А вот теперь вопрос: как этим воспользоваться в 1С при открытии через OLE? :)"

Денис (САМАРА)
активный пользователь
офлайн
Дата регистрации: 09.04.2008
Сообщений: 8345
Пост №2
 
29.04.2009 12:50

Владимир, Вы Brain Crasher. :)

Показывать по 10 20 40 сообщений

Читают тему:

1 гостей
Быстрый переход
Для технических специалистов
  • Учет, налогообложение, автоматизация
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • ЕГАИС
Предложения партнеров
Обучение пользователей продуктов 1С

1С бесплатно 1С-Отчетность 1С:ERP Управление предприятием 1С:Бесплатно 1С:Бухгалтерия 8 1С:Бухгалтерия 8 КОРП 1С:Бухгалтерия автономного учреждения 1С:Бухгалтерия государственного учреждения 1С:Бюджет муниципального образования 1С:Бюджет поселения 1С:Вещевое довольствие 1С:Деньги 1С:Документооборот 1С:Зарплата и кадры бюджетного учреждения 1С:Зарплата и кадры государственного учреждения 1С:Зарплата и управление персоналом 1С:Зарплата и управление персоналом КОРП 1С:Комплексная автоматизация 8 1С:Лекторий 1С:Предприятие 1С:Предприятие 7.7 1С:Предприятие 8 1С:Розница 1С:Управление нашей фирмой 1С:Управление производственным предприятием 1С:Управление торговлей 1СПредприятие 8

Все теги