Работа с excel из outlook. Library not registered

@bonanza · Регистрация: 23.03.2015

Студворк — интернет-сервис помощи студентам

Добрый день.
Возникла задача формировать таблицу excel из макроса outlook.
Оба приложения установлены одновременно из одного дистрибутива msOffice 2010, установлен sp1.
Без подключения объектной библиотеки excel (tools > references, microsoft excel 14.0 object library) не работает раннее связывание и среда ругается на такие сложные вещи, как range. Cells при этом понимает ).
Если подключить библиотеку - возникает ошибка "Automation error. Library not registered".

Ошибка возникает, например на 2 строе этого кода:

Visual Basic
1
2
dim xlApp as excel.application
set xlApp = CreateObject("excel.application")

Как это лечить?

@snipe · 20.03.2019, 08:24

Visual Basic
1
dim xlApp as object

так раннее связывание и предполагает что библиотека уже подключена (принудительно руками)
а вот позднее связывание не предполагает что библиотека подключена
что лучше - тут много про это уже сказано
по мне так ...
в процессе разработки кода подключить библиотеку
а при передаче в эксплуатацию переделать код на позднее связывание

Добавлено через 9 минут
и аккуратнее с префиксом xl в переменных
Excel этот префикс использует для обозначения своих констант

@bonanza · 20.03.2019, 09:15 **[ТС]**

snipe, подскажите, как в тексте макроса outlook подключить библиотеку экселя!
Поставить галочку в referenses, походу, на моем компе недостаточно (win10 + office 2010). Хотя у коллеги с win7 ошибка пропадает.
PS про префикс спасибо, учту!

@snipe · 20.03.2019, 10:08

может все таки excel криво стоит

@bonanza · 20.03.2019, 12:27 **[ТС]**

snipe, тоже об этом подумал. Изначально было win10_x64 + office 2010_x86.
переустановил этот же офис - не помогло, поставил office 2010_x64 - не помогло. Установка sp2 в обоих случаях так же не повлияла. Другие версии офиса ставить не могу.
Скрипт валится в ошибку "библиотека не зарегистрирована".
может есть возможность как-то ее перегистриировать?

зы. как альтернатива - можно попробовать отключить либу и полностью объявлять все методы... но там тоже для меня есть непонятки.

Visual Basic
1
2
3
Set xlApp = CreateObject("Excel.Application")
Set xlWbRep = xlApp.Workbooks.Open("d:\monitoring.xlsx")
xlApp.xlWbRep.worksheets("Лист1").range(cells(3, iFCol), cells(45, iFCol + 5)).Clear

в этом коде среда не понимает слово cells.
Как это написать корректно?

@pashulka · 20.03.2019, 12:33

Сообщение от bonanza

в этом коде среда не понимает слово cells.

Нужно просто явно указать родителя, т.е.

Visual Basic
1
2
3
4
5
Set xlApp = CreateObject("Excel.Application")
Set xlWbRep = xlApp.Workbooks.Open("d:\monitoring.xlsx")
With xlApp.xlWbRep.Worksheets("Лист1")
     .Range(.Cells(3, iFCol), .Cells(45, iFCol + 5)).Clear
End With

@bonanza · 20.03.2019, 12:48 **[ТС]**

это я уже пробовал.
на строке With xlApp.xlWbRep.Worksheets("Лист1") скрипт падает с ошибкой "object doesnt support this property or method"

@pashulka · 20.03.2019, 13:03

Сорри, за копирование Ваших ошибок

Visual Basic
1
With xlWbRep.Worksheets("Лист1")

или

Visual Basic
1
With xlApp.Workbooks("Monitoring.xlsx").Worksheets("Лист1")

@bonanza · 20.03.2019, 16:07 **[ТС]**

pashulka, спасибо, завтра попробую.
Похоже беда с либой связана с доменными политиками, а значит в нашем случае неизлечима )
А можете объяснить теоретическую разницу между моей кривой конструкцией и предложенными Вами вариантами? Ну так, для моего общего развития ))

@pashulka · 21.03.2019, 07:34

bonanza, На официальном сайте можно найти статью о необходимости явно указывать родителя и для Cells

Excel automation fails second time code runs

Новые блоги и статьи Все статьи Все блоги /
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .

@bonanza 2 / 2 / 1 Регистрация: 23.03.2015 Сообщений: 78
	20.03.2019, 09:15 [ТС]
	snipe, подскажите, как в тексте макроса outlook подключить библиотеку экселя! Поставить галочку в referenses, походу, на моем компе недостаточно (win10 + office 2010). Хотя у коллеги с win7 ошибка пропадает. PS про префикс спасибо, учту! 0

@snipe 4089 / 1469 / 401 Регистрация: 07.08.2013 Сообщений: 3,672
	20.03.2019, 10:08
	может все таки excel криво стоит 0

@bonanza 2 / 2 / 1 Регистрация: 23.03.2015 Сообщений: 78
	20.03.2019, 12:48 [ТС]
	это я уже пробовал. на строке With xlApp.xlWbRep.Worksheets("Лист1") скрипт падает с ошибкой "object doesnt support this property or method" 0

@bonanza 2 / 2 / 1 Регистрация: 23.03.2015 Сообщений: 78
	20.03.2019, 16:07 [ТС]
	pashulka, спасибо, завтра попробую. Похоже беда с либой связана с доменными политиками, а значит в нашем случае неизлечима ) А можете объяснить теоретическую разницу между моей кривой конструкцией и предложенными Вами вариантами? Ну так, для моего общего развития )) 0

@pashulka 4139 / 2243 / 940 Регистрация: 01.12.2010 Сообщений: 4,624
	21.03.2019, 07:34
	bonanza, На официальном сайте можно найти статью о необходимости явно указывать родителя и для Cells Excel automation fails second time code runs 1

Работа с excel из outlook. Library not registered

Решение