Funzione Red

Restituisce il componente rosso del codice di colore composito specificato.

Sintassi:


Red (ColorNumber As Long)

Valore restituito:

Integer

Parametri:

ColorNumber: numero intero lungo che specifica un codice di colore composito per il quale deve essere restituito il componente rosso.

warning

Under VBA compatibility mode (Option VBASupport 1), the function Red() is incompatible with VBA colors, when color from previous call to function RGB [VBA] is passed.


Codici di errore:

5 Richiamo di procedura non valido

tip

La finestra di dialogo per la scelta del colore specifica i componenti rosso, verde e blu di un codice colore composito e anche il suo valore in formato esadecimale. La modifica del colore del testo e la selezione di un colore personalizzato richiama la finestra di dialogo per la scelta del colore.


Esempio:


Sub ExampleColor
Dim lVar As Long
    lVar = rgb(128,0,200)
    MsgBox "Il colore " & lVar & " è formato da:" & Chr(13) &_
        "rosso= " & red(lVar) & Chr(13)&_
        "verde= " & green(lVar) & Chr(13)&_
        "blu= " & blue(lVar) & Chr(13) , 64,"colori"
End Sub