Изменить исходные данные для диаграммы внутри PPT - PullRequest
0 голосов
/ 03 июля 2019

Я делаю игру PPT для работы.Одна из вещей, которые я хочу сделать, это отображать графики, которые показывают очки разных команд.Я хочу получить значения из таблицы внутри PPT (не из Excel), которая затем передается на график.Позже я добавлю функцию ввода для передачи ввода в таблицу и оттуда в диаграмму.

У меня есть таблица (3x3 с 3 заголовками столбцов в A1-C1 и случайные целые числа в A2:C3), которую я уже создал в PPT (переименован в "testsource").Я хочу, чтобы эта таблица, созданная в PPT, передавала данные / обновляла источник для диаграммы, находящейся на том же слайде ("testchart").Я пытаюсь добавить точки в таблицу тестов, чтобы потом она изменила диаграмму.

Пока я не беспокоюсь о получении ввода, я просто хочу подключить таблицуна график.

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

Я попробовал пару вещей и могу 'получить таблицу для загрузки в график

Dim currentSlide As PowerPoint.Slide
Dim pleaseChartTest As PowerPoint.Shape

Set currentSlide = ActivePresentation.Slides(4)
Set pleaseChartTest = currentSlide("testchart")

Dim pleaseChartTest As Shape
Dim datasourceTable As Table
Set datasourceTable = ActivePresentation.Slides(4).Shapes("testsource").Table

Set pleaseChartTest = ActivePresentation.Slides(4).Shapes("testchart").Chart

pleaseChartTest.SetSourceData = datasourceTable.Range("A1:D3")
...