powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вывод средствами VB графика Excel на место закладки Word
1 сообщений из 1, страница 1 из 1
Вывод средствами VB графика Excel на место закладки Word
    #32269908
vvzahar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Строится отчет в Ворде, где на место одной из закладок вставляется
график.

Проблема состоит в том, что отчет в Ворде с использованием графиков не всегда открывается.
Причину ни как не могу отловить.
Если убрать график и оставить только текстовые закладки, то открытие
Ворда происходит четко.

Может кто сталкивался с подобным глюком?

Пример кода:

Dim wrd As Word.Application, doc As Word.Document, bkm As Word.Bookmark
Dim obj As Object
doc.Bookmarks("Graph1").Range.InlineShapes(1).Activate
Set obj = doc.Bookmarks("Graph1").Range.InlineShapes(1).OLEFormat.object
With obj.Application.datasheet
.Cells(1, 2) = "Дата: " & Format(dtpStartDate, "dd mmm yyyy")
.Cells(1, 3) = "Дата: " & Format(dtpEndDate, "dd mmm yyyy")
.Cells(2, 2) = rs1!P12904
.Cells(2, 3) = rs2!P12904
.Cells(3, 2) = rs1!P11904
.Cells(3, 3) = rs2!P11904
.Cells(4, 2) = rs1!P13004
.Cells(4, 3) = rs2!P13004
End With
obj.Application.Update
obj.Application.Quit
...
Рейтинг: 0 / 0
1 сообщений из 1, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вывод средствами VB графика Excel на место закладки Word
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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