How to create an RGB color object

Use this function to create a RGB color object for use with symbols.

How to use

  1. Call this function in VBA passing in red, green and blue values. The functionreturns an IRgbColor reference on a RgbColor object.
[VBA] 
Private Function GetRGBColor(pRed As Long, pGreen As Long, _
                             pBlue As Long) As IRgbColor
    Dim pRGB As IRgbColor
    Set pRGB = New RgbColor
    With pRGB
        .Red = pRed
        .Green = pGreen
        .Blue = pBlue
        .UseWindowsDithering = True
    End With
    Set GetRGBColor = pRGB
End Function