Excel equidistant background coloring using the golden ratio and VBA.
To use this macro, call the ColorUniqueCellsUsingGoldenRatio subroutine with a Range argument.
Dim selection As range
Set selection = Application.selection
ColorUniqueCellsUsingGoldenRatio selection ' or: Call ColorUniqueCellsUsingGoldenRatio(selection)- https://gamedev.stackexchange.com/questions/46463/how-can-i-find-an-optimum-set-of-colors-for-10-players
- https://stackoverflow.com/questions/3018313/algorithm-to-convert-rgb-to-hsv-and-hsv-to-rgb-in-range-0-255-for-both
- https://www.howtobuildsoftware.com/index.php/how-do/cr3z/vba-ms-access-double-modulus-mod-with-doubles