代码之家 › 专栏 › 技术社区 › Jason Stallard

如何用VBA修改Powerpoint图表标题文本

powerpoint-vba charts

Jason Stallard · 技术社区 · 6 年前

我有一个Powerpoint 2013演示文稿,幻灯片上有几个图表。我想修改图表标题,但不知道如何选择文本。

Activepresentation.Slides(1).Shapes("Chart 2").Chart.Title = "some text" 不会改变什么。如果我在那行前面加上 Set “它给了我们” 编译错误:属性的使用无效 "

ActivePresentation.Slides(1).Shapes("Chart 2").TextFrame.TextRange.Text = "some text" “给予” 运行时错误“-2147024809#80070057#”:指定的值超出范围 "

图表标题是两行文字大小的混合体。整个图表都是从Excel复制过来的。我需要的结果是以编程方式修改标题的后半部分。

Sheets("Sheet 1").ChartObjects("Chart 2").Name Sheets("Sheet 1").ChartObjects("Chart 2").HasTitle “给予” 运行时错误“438”:对象不支持此属性或方法 ".

1 回复 | 直到 4 年前

Jon Peltier 6 年前

你的语法不完整;你需要 Chart ChartTitle 不 Title Text ):

ActivePresentation.Slides(1).Shapes("Chart 2").Chart.ChartTitle.Text = "some text"

介于 Shapes 或 ChartObject 以及图表的任何属性或方法 图表

Sheets("Sheet 1").ChartObjects("Chart 2").HasTitle

失败了,但是

Sheets("Sheet 1").ChartObjects("Chart 2").Chart.HasTitle

返回True或False。

如果没有PowerPoint中的宏录制器(在office2007之前有一个宏录制器将其删除),这将变得更加困难,因此您需要使用Excel,然后将其移植到powerpointvba中。

推荐文章

Mnag · 下表中第95百分位的120%是多少?

1 年前

ttruhcheva · 如何在Power BI中创建灵活的数据标签?

2 年前

Î²Î³Î¹ Robert Longson · 广告牌js可选Y网格线-标签背景样式

6 年前

Ricardo Prida · Apache POI Powerpoint,XMLSlideShow。找不到createChart()

6 年前

Abhishek · 无法在NVD3中制作图表。x/y轴上的格式问题

6 年前

Paul Chris Jones · 在google中包含字符串列。可视化。数据组

6 年前

Joe Firebaugh · HighCharts项目符号图表似乎忽略了xAxis minTickInterval

6 年前

amea6995 · If/ElseIf语句仅适用于第一个If语句

6 年前

yash041 · google charts图形设置图例值和相同颜色列

6 年前

user8703261 · morris中的x轴问题。js公司

6 年前