Just happened to stumble on this thread while looking for the same answer...
I created three long constants in a public module (Utilities), set values to RGB numbers: 100, 150, 200 for example.
Then created a public function
Code:
ColorTest as Long
Code:
Public Function ColorTest() As Long
ColorTest = RGB(c_Color1, c_Color2, c_Color3)
End Function