Ajuda del LibreOffice 7.2
Returns the Green component of the given composite color code.
Green (Color As Long)
Enter
Color Expressió d'enter gran que especifica un codi de color compost per al qual retornar el component verd.
Sub ExampleColor
Dim lVar As Long
lVar = rgb(128,0,200)
Msgbox "El color " & lVar & " conté els components:" & Chr(13) &_
"red = " & red(lVar) & Chr(13)&_
"green = " & green(lVar) & Chr(13)&_
"blue = " & blue(lVar) & Chr(13) , 64,"colors"
End Sub