Я делаю игру 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")