我想更改所选形状的颜色。如果我点击一个形状,我点击一个按钮,我想改变红色的颜色,如图片,但当我按下按钮。
我如何创建一个按钮,我设置条件来改变选择的颜色形状?
我尝试通过按其他形状来改变颜色但不是我想要的。
非常感谢
答案 0 :(得分:0)
好的,首先,因为您试图更改所选形状的颜色,这意味着您处于正常(编辑)视图而不是幻灯片放映。其次,只有在幻灯片放映模式下才能单击带有操作以运行宏的ActiveX按钮或形状。因此,普通视图中“按钮”的唯一选项是使用Office的功能区扩展功能。您需要将按钮的XML添加到PowerPoint文件的customUI并创建关联的宏以使其运行。例如,使用CustomUI Editor:
将此XML添加到您的文件中// Fluent UI customisation to add a single button to the PowerPoint ribbon //
// Written by Jamie Garroch of YOUpresent Ltd. http://youpresent.co.uk //
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui">
<ribbon>
<tabs>
<tab id="tabMyTab" label="My Tab">
<group id="grpMyGroup" label="My Group">
<button id="btnMyButton" label="My Button" onAction="MyMacro"/>
</group>
</tab>
</tabs>
</ribbon>
</customUI>
...然后在CustomUI编辑器中关闭文件并在PowerPoint中重新打开。然后添加你的宏:
' PowerPoint macro to change the fill colour of a single selected shape
' Written by Jamie Garroch of YOUpresent Ltd. http://youpresent.co.uk
Public Sub MyMacro(control As IRibbonControl)
With ActiveWindow.Selection
If .Type = ppSelectionShapes Then
If .ShapeRange.Count = 1 Then
If .ShapeRange.Type = msoAutoShape Then
.ShapeRange.Fill.ForeColor.RGB = RGB(255, 0, 0)
End If
End If
End If
End With
End Sub
现在,当您点击自定义标签我的标签中的我的按钮时,如果幻灯片中有一个选定形状的自选图形,则填充颜色将为变成红色。