Codice colore su VBA

Question

Ciao a tutti !!

Su di un codice VBA che mi definisce dimensione e colore del carattere è presente un numero che definisce il colore.

Dato che vorrei cambiare il colore attuale non saprei dove andare a reperire il codice del colore che mi interessa.

With Selection.Font

    .Color = **-16776961** 

    .Name = "Segoe UI" 

    .Size = 16

Sarei grato se qualcuno mi possa aiutare nel reperire i codici colori di quella tipologia

Answer 1

Ciao Torical,

C'è qualche servizio online dove posso digitare quella tipologia di codice e mi da il numero corrispondente e viceversa senza dover creare utf o altro.

[...]

Un tale servizio troverai Qui

===

Regards,

Norman

Answer 2

Ciao Torical,

C'è qualche servizio online dove posso digitare quella tipologia di codice e mi da il numero corrispondente e viceversa senza dover creare utf o altro.

Non mi è chiaro cosa stai cercando di fare. Se dovessi spiegare le tue esigenze in modo più dettagliato, forse potremmo essere in grado di aiutarti ulteriormente.

La mia predilezione personale è definire i colori utilizzando i valori RGB corrispondenti. Senza ricorrere a VBA è possibile impostare il colore desiderato selezionando i valori RGB richiesti:

     [![Immagine](https://learn-attachment.microsoft.com/api/attachments/5388890b-bdd4-4a52-af7d-ccb660b72fa5?platform=QnA  

In modo analogo si puo restuire i valori RGB di un colore standad:

     [![Immagine](https://learn-attachment.microsoft.com/api/attachments/c56fda2e-14ae-41bf-9619-408a5f1a6ad3?platform=QnA  

Non conosco a che tipologia di codice appartiene.

Ho provato a cercare, RGB, HEX e altri ma un codice di 8 cifre non so a quale sistema dei colori appartiene

Excel memorizza i 16 milioni di colori disponibili in una cartella di lavoro come un RGB long; questo è il valore numerico restituito dalla proprietà color vba.

===

Regards,

Norman

Answer 3

Grazie credo di aver risolto da me.

Semplicemente volevo cambiare quel numero -16776961 corrispondente al colore assegnato nel comando VBA.

Non sapendo come ci si arrivasse a quel numero ho chiesto aiuto qui.

Quel sito che mi hai mandato lo conosco come ne conosco altri ma non sapevo a quale codice colore appartenesse quel numero (RBG, CSS, HEX, ecc ) dato che ho visto un trattino o segno meno e poi 8 cifre.

Attraverso qualche tentativo mi è sembrato appartenesse al sistema RGB e quindi ho cambiato il suo valore nel rosso classico 255,0,0 e ho digitato sostituito il numero -16776961col numero 2550000 e sembra funzionare.

Tutto qua.

Grazie lo stesso

Answer 4

C'è qualche servizio online dove posso digitare quella tipologia di codice e mi da il numero corrispondente e viceversa senza dover creare utf o altro.

Non conosco a che tipologia di codice appartiene.

Ho provato a cercare, RGB, HEX e altri ma un codice di 8 cifre non so a quale sistema dei colori appartiene

Answer 5

Ciao Torical,

Su di un codice VBA che mi definisce dimensione e colore del carattere è presente un numero che definisce il colore.

Dato che vorrei cambiare il colore attuale non saprei dove andare a reperire il codice del colore che mi interessa.

With Selection.Font

.Color = -16776961

.Name = "Segoe UI"

.Size = 16

Sarei grato se qualcuno mi possa aiutare nel reperire i codici colori di quella tipologia

In un modulo di codice stanard, incolla la seguente UDF (fuzione utente):

'========>>

Option Explicit

'-------->>

Public Function Restituire_Colore(rCell As Range) As Long

Restituire_Colore = rCell.Interior.Color

End Function

'<<========

Poi, per restiuireil numero del colore di interesse, nel foglio immetti una formula del genere:

'========>>

Option Explicit

'-------->>

Public Function Restituire_Colore(rCell As Range) As Long

Restituire_Colore = rCell.Interior.Color

End Function

'<<========

    [![Immagine](https://learn-attachment.microsoft.com/api/attachments/08280eb3-b18c-4c2f-b2ae-063aa5895e30?platform=QnA

In alternativa potresti scaricare l'applicazione **ColorCop** con cui puoi restituire il valore del colore di qualsiasi colore all'interno o all'esterno di Excel.

===

Regards,

Norman