powerpoint 2010 vba-非连续文本选择_Vba_Text_Selection_Powerpoint_Powerpoint 2010

powerpoint 2010 vba-非连续文本选择

vba text

powerpoint 2010 vba-非连续文本选择,vba,text,selection,powerpoint,powerpoint-2010,Vba,Text,Selection,Powerpoint,Powerpoint 2010,我想选择Powerpoint文本框（2010版）中具有特定定义样式的所有字符（例如，所有粗体字符）。通过手动方式，只需在选择时按住control键，即可在单个文本框中创建非连续文本选择。使用VBA，我到目前为止失败了。这是我非常简单的方法： Dim c As TextRange For Each c In ActiveWindow.Selection.ShapeRange(1).TextFrame.TextRange.Characters If c.Font.Bold Then c.Se

我想选择Powerpoint文本框（2010版）中具有特定定义样式的所有字符（例如，所有粗体字符）。通过手动方式，只需在选择时按住control键，即可在单个文本框中创建非连续文本选择。使用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将始终“取消选择”以前选择的内容，并且没有扩展选择的选项（与形状选择不同）。我最后只选择了最后一个粗体字符

选择本身就是我想要的最终结果，让用户可以选择进一步修改字体等

是否有人有建议（或者根本无法通过VBA访问）

非常感谢

只是一个问题，不连续文本选择的目的是什么？你在做一些文本格式化吗？如果是这样，你可以一次只演一个角色。例如

如果是c.Font.Bold，那么是c.Font.Italic

谢谢你的提问；我想让用户选择文本中的一个字符，然后让VBA自动选择与他们选择的字符格式相同的所有其他字符（粗体/颜色/字体大小等）。这样，他们就可以根据自己的需要重新格式化，例如设置另一种字体颜色。基本上，帮助用户进行选择过程。我不认为这是通过VBA实现的（尽管我认为这个想法很可爱）。我想控制键在那里。好的，谢谢。太糟糕了，有些东西不能通过VBA控制。。。