Convertir une couleur long en rgb le plus rapidement possible via une api :op

Description

La meilleure façon et aussi la plus rapide de convertir une couleur Long en couleur RGB c'est tout bête mais comme j'en avais marre de voir des trucs du genre :

With machin
.Red = CByte(Int(ColorVal And &HFF))
.Green = CByte(Int((ColorVal And &HFF00) / &H100))
.Blue = CByte(Int((ColorVal And &HFF0000) / &H10000))
End With

qui est plus lent et moins judicieux que ma version :op (enfin pour moi apres vous en pensez ce que vous voulez ...)

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.