Форум программистов, компьютерный форум, киберфорум
Наши страницы
VBA
Войти
Регистрация
Восстановить пароль
 
rvg
150 / 27 / 1
Регистрация: 24.08.2014
Сообщений: 438
#1

Экспорт из Access в PowerPoint - VBA

21.04.2017, 10:21. Просмотров 278. Ответов 3

Форумчане, подскажите, плз, как обновить данные диаграммы шаблона PowerPoint данными рекордсета Access (не открывая Excel через Chart.ChartData.ActivateChartDataWindow)? Длительные блуждания по объектной модели, инету и форуму пока не дали результата((

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Public Sub add_PowerPoint()
 
 
    Dim db As Database, rst As Recordset
    Dim ppObj As PowerPoint.Application
    Dim ppPres As PowerPoint.Presentation
 
   Set ppObj = New PowerPoint.Application
   Set ppPres = ppObj.Presentations.Open(CurrentProject.path & "\REPORT" & "PRIMER1.potx")
   
    ppPres.Slides(1).Select
    ppPres.Slides(1).Shapes(1).TextFrame.TextRange.Text = "ПРИМЕР 2222"
 
    ' открытие рекордсета
    Set db = CurrentDb
    Set rst = db.OpenRecordset("z_DnStac_r6_UNION", dbOpenDynaset)
   
      ppPres.Slides(2).Shapes(1).Chart.ChartData.Activate
 
     ' ............................... ' здесь нужно вставить данные из рекордсета в таблицу данных диаграммы
 
  
  End Sub

http://www.cyberforum.ru/vba/thread1001929.html
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.04.2017, 10:21
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Экспорт из Access в PowerPoint (VBA):

Экспорт из access в excel
Скажите пожалуйста, как программно осуществить экспорт таблицы access в excel....

Экспорт данных из Excel в Access
Возникла проблема с экспортом данных. когда access база лежала в той же папке...

Экспорт из Access в Excel (GetObject)
Добрый день! Экспорт из Access в нужный мне фаил Excel осуществляю с помощью...

Экспорт данных из excel в access
Доброго времени суток друзья! Я знаю что данная тема не раз поднималась здесь,...

Экспорт таблиц из access в excel и наоборот
Как импортировать таблицу excel в access и наоборот в vba?

3
mc-black
2759 / 695 / 101
Регистрация: 04.02.2011
Сообщений: 1,421
21.04.2017, 13:43 #2
Диаграмма - это внедренный объект Excel? Выложите ссылку на пример презентации с графиком. Если знаете, опишите путь, которым эти диаграммы вставояются или изменяются без макросов - вручную, оператором пк.

Добавлено через 4 минуты
Идея в том, чтобы из объектной модели PowerPoint получить ссылку на объект Excel.Worksheet с графиком, найти диапазон данных графика и изменить в нем данные.
0
rvg
150 / 27 / 1
Регистрация: 24.08.2014
Сообщений: 438
21.04.2017, 21:32  [ТС] #3
Презентация Poverpoint, диаграмма в презентации (из кода видно). Открывается готовая презентация, требуется внести изменения в данные графика

Добавлено через 7 часов 27 минут
Цитата Сообщение от mc-black Посмотреть сообщение
Идея в том, чтобы из объектной модели PowerPoint получить ссылку на объект Excel.Worksheet
в целом идея мне понятна, но не могу найти соответствующие методы, буду благодарен за пример кода ))
0
mc-black
2759 / 695 / 101
Регистрация: 04.02.2011
Сообщений: 1,421
23.04.2017, 22:42 #4
Где пример презентации? Необязательно с настоящим содержимым, но обязательно созданной тем же методом, что и нуждающаяся в изменениях. Без примера презентации тупо не на чем тестировать макрос.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
23.04.2017, 22:42
Привет! Вот еще темы с решениями:

Экспорт записей из таблиц access в excel и наоборот
Здравствуйте, уважаемые участники! Стоит такая задача: Необходимо...

Экспорт из Access 10 средствами VBA в файл xlsx и xlsm
Коллеги, добрый день! Подскажите, пожалуйста, в возникшей проблеме при...

Метод AddChart2 не строит диаграмму по заданному диапазону (экспорт из Access)
Добрый день! У меня такой вопрос. Есть форма access, в которой можно выбрать...

PowerPoint демонстрация
Доброго времени суток! Необходимо сделать презентации в Powerpoint 2013 c...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru