使用VBa

Question

我正在尝试在PowerPoint中粘贴的数据透视表对象中自动调整文本。我已成功将数据透视表粘贴到PowerPoint中，但无法弄清楚如何更改形状中的字体大小，甚至无法更好地将字体自动调整到形状中。这甚至可能吗？这就是我试图改变字体的原因。它没有用。

Set ppShape = PPSlide.Shapes(2)
With ppShape.TextFrame.TextRange.Font
    .Size = 16
    .Bold = True
End With

我使用PasteSpecial Default粘贴数据透视表。我想知道这是否与它有关。

PPSlide.Shapes.PasteSpecial (ppPasteDefault)

谢谢！