vba 中的颜色混合器

Question

您可以使用以下链接在html中混合两种颜色。

https://www.w3schools.com/colors/colors_mixer.asp

我正在寻找vba中的颜色混合器代码。

我尝试使用双颜色渐变方法，但它给出了不同的输出。

Sub SetGradient()
Dim myrange As Range
Set myrange = ThisWorkbook.Sheets("Sheet1").Range("B1")
    With myrange.Interior
        .Pattern = xlPatternLinearGradient
        .Gradient.Degree = 90
        .Gradient.ColorStops.Clear
    End With
    With myrange.Interior.Gradient.ColorStops.Add(0.5)
        .Color = vbRed
    End With
    With myrange.Interior.Gradient.ColorStops.Add(0.5)
        .Color = vbBlue
    End With
End Sub

您可以点击以下链接查看我想要哪种颜色。

图片

Answer 1

如果你愿意，我可以制作一个相关视频:) https://youtube.com/@buildgreatproducts?si=A5EoDdUkow9H1_5-