1
我有任务使颜色填充Powerpoint VBA。当我选择线条和框时,我只想更改线条并将框的颜色保留。有没有办法只改变私人形状?如何仅更改vba powerpoint中的线形颜色
我有任务使颜色填充Powerpoint VBA。当我选择线条和框时,我只想更改线条并将框的颜色保留。有没有办法只改变私人形状?如何仅更改vba powerpoint中的线形颜色
下面的代码将改变在幻灯片2中的所有线条颜色为红色,2007年简报:
Public Sub ChangeLineColours()
Dim shp As Shape
For Each shp In ActivePresentation.Slides(2).Shapes '<~~ Change '2' to whichever slide you want to loop through
If shp.Type = msoLine Then
shp.Line.ForeColor.RGB = RGB(255, 0, 0)
End If
Next shp
End Sub
加雷思谢谢它是有益的 –