powerpoint 2010 vba - 不连续的文本选择

Question

我想选择具有特定定义样式的Powerpoint文本框（版本2010）中的所有字符（例如，所有粗体字符）。手动，只需在选择时按住控制键，即可在单个文本框中创建不连续的文本选择。有了VBA，我到目前为止失败了。这是我非常简单的方法：

 Dim c As TextRange
 For Each c In ActiveWindow.Selection.ShapeRange(1).TextFrame.TextRange.Characters
  If c.Font.Bold Then c.Select
 Next c

虽然在逐步完成这一步时这一切都很顺利，但c.Select将始终＆＃34;取消选择＆＃34;之前选择的是什么，没有选项来扩展选择（与形状选择不同）。我最终选择了最后一个大胆的角色。

选择本身就是我想要的最终结果，为用户提供进一步修改字体等的选项。

有没有人有建议（或者这是不是可以通过VBA访问？）

非常感谢