Macro cannot find shading colour black

[Aquinax]

Can one search for the colour's HSL value? The macros below search for the Hex and RGB color values respectively:

With Selection.Find.ParagraphFormat
        .Shading.BackgroundPatternColor = &HFFFF&

        .Shading.BackgroundPatternColor = RGB (255,255,0)

Can HSL value be likewise specified? It can come in very handy when searching for a specific black colour HSL(x,0,0) where x can be any number 0-255, while RGB cannot differentiate here at all ... Thank you