我如何在渐变形状上获得色块？ VBA

我如何在形状上获得色块？我正在创建一个树状流程图，我想给它们一个渐变，我也想按百分比更改渐变，所以我希望一个节点的颜色停止为50％。我如何在渐变形状上获得色块？ VBA

所以，我直到现在对于给渐变图案的代码是：

 QNode.Shapes(1).Fill.TwoColorGradient msoGradientVertical, 1

我尝试类似：

QNode.Shapes(1).Fill.Interior.Gradient.ColorStops.Add(0.66)

不工作...

规格：应该在2003年工作

来源

2017-06-15 Guilherme Felipe Reis

我发现解决方案：

 With QNode.Shapes(1).Fill 
      .ForeColor.RGB = RGB(255, 255, 255) 
      .TwoColorGradient msoGradientVertical, 1 
      .GradientStops(2).Color = RGB(0, 0, 0) 
      .GradientStops(2).Position = 0.66    
     End With

我只需要使用GradietStops = d与我想要的位置，在这种情况下，我只想两个位置，所以gradientStops（1）和gradientStops（2），但你也可以添加多个位置。

 .GradientStops.Insert RGB(0, 0, 0), 0.66

来源

2017-06-15 10:29:10

我如何在渐变形状上获得色块？ VBA

回答

相关问题