Question

handleChange(index, newElement){
    var newStateArray = update(this.state.myArray, {
        [index]: {b: {$set: newElement.target.value} }
    });
    this.setState({myArray: newStateArray });
}

所以这段代码完美无缺：

正确打开PowerPoint文件
Excel图表已粘贴并调整大小/重新定位

但是，我无法弄清楚如何应用我在同一目录中保存的图表模板。您可以看到我已尝试使用“粘贴第二个图表”部分中注释掉的“ApplyChartTemplate”行完成此操作。

我很感激这里的任何帮助。在将图表模板粘贴到幻灯片后，我尝试了许多不同的方法来应用它。我还没有取得任何成功。

由于

Answer 1

这可能是与机器相关的计时问题（从剪贴板粘贴可能导致在粘贴操作完成之前VBA代码正在运行）。尝试在PasteSpecial行之后立即调用此Delay子。

Delay 1, True

Public Sub Delay(Seconds As Single, Optional DoAppEvents As Boolean)
  Dim TimeNow As Long
  TimeNow = Timer
  Do While Timer < TimeNow + Seconds
    If DoAppEvents = True Then DoEvents
  Loop
End Sub

Answer 2

PasteSpecial返回一个shaperange，而不是shape，但您需要将模板应用于单个形状（即图表对象）。试试这个：

'Newcastle Upon Tyne'
'Newcastle-Upon Tyne'
'Newcastle Upon-Tyne'
'Newcastle-Upon-Tyne'

VBA - 如何在将Excel图表粘贴到PowerPoint后应用图表模板

2 个答案: