使用VBA的圆角文本框 [英] Textbox with rounded corners using VBA

问题描述

我在PowerPoint幻灯片中有一个预定义的文本框，我需要使其角变圆。是否可以使用VBA执行此操作？

推荐答案

此示例假定您要查找的形状是幻灯片1上的第三个形状。请相应调整：

Sub Test()
Dim oSh As Shape
Set oSh = ActivePresentation.Slides(1).Shapes(3)
With oSh
    .AutoShapeType = msoShapeRoundedRectangle
    .Adjustments(1) = 0.25
End With
End Sub

它将文本框转换为圆角矩形，然后设置圆角。据我所知，您不能对常规文本框的角进行圆角操作。

这篇关于使用VBA的圆角文本框的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！