Question

我正在尝试使用VBA在Excel中为线形添加渐变。 Line Color选项下的Format Shape部分提供了此功能。尽管Format Shape选项下存在此功能，但我无法在VBA中重现该功能。我的代码是：

With ActiveSheet.Shapes("Straight Connector 4")
    .Line.ForeColor.RGB = RGB(193, 193, 193)
    .Line.Transparency = 0.25
    .Line.Visible = msoTrue
    .Line.ForeColor.SchemeColor = 24
    .Line.BackColor.SchemeColor = 34
    .Line.GradientStops.Insert RGB(255, 0, 0), 0.25 ' Creates error
    .Line.Gradient.ColorStops.Add (1) ' Creates error
End With

我知道您可以轻松地向形状填充添加渐变，但是当想要向形状线添加渐变时，所有搜索结果都不会返回任何内容。任何想法都非常受欢迎。

Answer 1

据我所知，这是不可能的。您可以通过VBA为形状填充设置渐变，但不能为线条执行此操作。您可以创建具有渐变填充且没有边框的薄形状，或者您必须使用VBA之外的内容。（例如.VB.NET + OpenXLM SDK。）

向形状/线添加渐变

1 个答案: