Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Уточнить, что не подключена библиотека / 8 сообщений из 8, страница 1 из 1
29.07.2020, 09:59
    #39984837
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Уточнить, что не подключена библиотека
здравствуйте, подскажите как?
речь о Can't find project or library - Не могу найти проект или библиотеку, метод
Код: vbnet
1.
2.
On Error Resume Next
Debug.Print Err.Description


не прокатывает, увы)) спс
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.07.2020, 16:55
    #39985052
ldfanate
ldfanate
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Уточнить, что не подключена библиотека
раннее связывание ОЛЕ применяете? Замените на позднее и ловите ошибку на createobject, как вариант.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.08.2020, 08:03
    #39985865
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Уточнить, что не подключена библиотека
ldfanate, пошёл другим путём
Код: vbnet
1.
2.
3.
4.
Debug.Print ActiveDocument.VBProject.References.Count
    For q = 1 To ActiveDocument.VBProject.References.Count
        Debug.Print ActiveDocument.VBProject.References.Item(q).Description
    Next q


всё бы хорошо если бы в ответе не было предпоследней, пустой строки
5
Visual Basic For Applications
Microsoft Word 11.0 Object Library
OLE Automation

Microsoft Office 11.0 Object Library
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.08.2020, 15:16
    #39987519
ldfanate
ldfanate
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Уточнить, что не подключена библиотека
Так в меню Tools\References отключите битую ссылку.
Зачем её именно кодом вытаскивать, когда и так посмотреть можно, какие подключены библиотеки.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.08.2020, 12:16
    #39987732
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Уточнить, что не подключена библиотека
ldfanate, вроде это спасло Debug.Print ActiveDocument.VBProject.References.Item(q).Name

Зачем её именно кодом вытаскивать, когда и так посмотреть можно, какие подключены библиотеки
пессимист?...
много чего можно, и к компьютеру вообще не подходить, жить в пещере, в тайге
это делается не для меня, для тех кому не нужно, трудно или в лом в меню Tools\References отключить битую ссылку
да и это нормально решить за него такие ньюансы
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.08.2020, 16:27
    #39988698
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Уточнить, что не подключена библиотека
и всё равно бывают случаи, что библиотека CoreLib подключена но макрос
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
Function FunctionGetCoreLib()
'Debug.Print ActiveDocument.VBProject.References.Count
    For q = 1 To ActiveDocument.VBProject.References.Count
        Debug.Print ActiveDocument.VBProject.References.Item(q).Name
        Debug.Print ActiveDocument.VBProject.References.Item(q).FullPath
        Debug.Print VBA.Len(Dir(ActiveDocument.VBProject.References.Item(q).FullPath))
        If ActiveDocument.VBProject.References.Item(q).Name = "CoreLib" And _
           ActiveDocument.VBProject.References.Item(q).FullPath = "C:\ДНСД\corelib.tlb" And _
           VBA.Len(Dir(ActiveDocument.VBProject.References.Item(q).FullPath)) <> 0 Then
            CoreLibBoll = True
            Exit For
        End If
    Next q
    'Debug.Print "CoreLibBoll-" & CoreLibBoll
    If CoreLibBoll = True Then GetConnection
End Function


не даёт CoreLibBoll = True, говорит, что CoreLibBoll = False, как в макросе поставить условие, чтобы его ответ соответствовал действительности? спс
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.08.2020, 06:50
    #39988844
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Уточнить, что не подключена библиотека
подозреваю, что причина видимо в том, что Debug.Print выдаёт на одной из библиотек:
Normal
C:\Documents and Settings\Admin\Normal
0
но мой файл Normal.dot находится в папке: C:\Documents and Settings\Admin\Application Data\Microsoft\Шаблоны
подскажите почему так происходит?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.08.2020, 07:30
    #39988851
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Уточнить, что не подключена библиотека
да и весь список библиотек и рядом не лежал, у меня по факту
Visual Basic For Applications
Microsoft Word 11.0 Object Library
OLE Automation
Microsoft Word 11.0 Object Library
CoreLib
Debug.Print печатает похожее но не то, а ещё почему повторение два раза Microsoft Word 11.0 Object Library - одного раза не достаточно))
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Уточнить, что не подключена библиотека / 8 сообщений из 8, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 1383ms
Закрыть
start [/forum/moderation_log.php?user_name=%D0%94%D0%B0%D1%80%D1%8C%D1%8F+%D0%9B%D1%8C%D0%B2%D0%BE%D0%B2%D0%B0]:
 0ms
get settings:
 12ms
get forum list:
 12ms
get settings:
 11ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 53ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 42ms
get tp. blocked users:
 2ms
others: 1215ms
total:  1383ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]