在 PowerPoint(Office 365) 中更改单元格值的代码 VBA

Question

我正在为公司的网络安全意识月制作一个 PPT 游戏。我正在使用 VBA 制作一些额外的功能，使其比危险风格的测验稍微好一点。我已经有了可以隐藏图片/使它们可见的按钮（动作按钮），以及可以更改另一张幻灯片上的文本的按钮（例如，幻灯片 2 上的按钮将全局变量设置为 "boop" 和然后更改幻灯片 1 上的文本框）。

现在我正试图找出代码来对在幻灯片中制作的 table 做同样的事情。 table 已经创建（并重命名为 "testtable"）。

我想 select 例如 A2，然后让 A2 = boop。我尝试了很多不同的代码，但无法弄清楚如何更改单元格值。

感谢帮助

此代码非常适合更改不同幻灯片上的文本

ActivePresentation.Slides(1).Shapes("textbox").TextFrame.TextRange.Text = randomInt

我试过

ActivePresentation.Slides(3).Shapes("testtable").table.TextFrame.TextRange.Text = randomInt

我试过将 .text 更改为 .value。我已经尝试了很多其他的东西，但是改变一个单元格有多卡？！

Answer 1

ActivePresentation.Slides(3).Shapes("testtable").Table.Cell(2, 1).Shape.TextFrame.TextRange.Text = randomInt

参见docs。

在 PowerPoint(Office 365) 中更改单元格值的代码 VBA

Code to Change Cell Value in PowerPoint(Office 365) VBA

powerpoint

vba