MEDIANIFS() in Excel VBA

I'm teaching myself VBA at the moment, & one thing that's really bugged me is that Excel doesn't have MEDIANIFS() function. My research has found:

• A MEDIANIF (one condition, not multiple) formula in VBA
• The array formula for {MEDIAN(IF(...))}
• Putting medians into pivot tables

PS. This is not self study, so posting a solution is fine, but tips are also welcome