Вытяните дополнительные данные из таблицы Powerpoint Chart

Question

Направляйте всех гуру PowerPoint.

Если у вас есть ряд данных, генерации диаграммы в PowerPoint Данные в Excel будет выглядеть

1. ITEM1 10
2. Item2 20
3. ITEM3 30
4. item4 40
5. Всего 100

Это достаточно просто, чтобы вытащить предметы и показать их ценность на графике ... но что, если вы хотите также вытащить общую стоимость? Другими словами, есть ли значение этой ячейки (назовите ее B5) в отдельном текстовом поле?

Вы можете настроить таргетинг на определенную ячейку внутри ячеек ячейки, используя синтаксис [cell], но который работает только внутри метки ... и вы не можете дублировать ярлык для ячейки/серии.

Есть ли простой способ ссылки на таблицу, из которой создается диаграмма, и вытащить значение конкретной ячейки?

Любые мысли или идеи?

Answer 1

Вот пример:

Dim oSh As Shape 
Dim oCht As Chart 
Dim oChtData As ChartData 
Dim x As Long 

' For purposes of example, assume that we've got a chart in PPT 
' and that it's selected: 
Set oSh = ActiveWindow.Selection.ShapeRange(1) 
' We could as easily pass a reference to the shape to this routine as a param 

' Sanity test; if it's not a chart, bug out 
If Not oSh.HasChart Then 
    Exit Sub 
Else 
    Set oCht = oSh.Chart 
    Set oChtData = oCht.ChartData 
End If 

With oChtData 
    .Activate 
    Debug.Print .Workbook.Worksheets("Sheet1").Cells(1, 2) 
End With 

' This leaves the workbook open , so: 
oChtData.Workbook.Close 

Answer 2

.pptx файлы могут быть распакованы для выявления внедренных .xlsx файлов для каждой карты. Почему бы вам не попробовать этот подход, чтобы добраться до данных, которые вы ищете. Просто измените расширение файла на .zip, извлеките и развяжите сочную доброту внутри. Там вы найдете таблицу Excel, которая появляется при редактировании данных для диаграммы в PowerPoint.

Существует десяток различных способов доступа к данным .xlsx, в зависимости от того, какой стек технологий вы используете (Google, который отдельно). Затем вы можете опросить ячейки и листы по своему усмотрению. Самая крутая часть заключается в том, что редактирование данных таким способом и перетаскивание pptx дает вам отличный способ создания автоматических отчетов с использованием PowerPoint в качестве ваших выходных ... анимаций и всех.

BTW, эта же техника распаковки, модификации и разворачивания pptx отлично подходит для автоматического обмена изображениями. Затем вы можете создавать некоторые изображения с использованием другой внешней системы, а затем обновлять pptx из командной строки.