Converting a VBA UDF into DAX

Hi experts,   Wondering if someone has already tried to convert a VBA function to DAX?    Function Cover(Stock As Double, Sales As Range) As Double s = Stock c = 0 For Each sale In Sales.Cells...