Necesito calcular la moda de 49 números. Pero sin la fórmula de WorksheetFunction.Mode(). Sino con for o if. Curso VBA

Lista de números -88.0077.00-37.0079.0059.0019.0058.0020.00-11.002.00-22.00-91.00-81.0066.0083.0087.00-21.0020.0061.0049.0061.0095.0056.00-90.0020.00-25.0066.0038.0020.0063.0017.00-81.0058.0020.0018.0016.00-87.0046.00-61.0020.00-83.00-14.00-72.0095.0035.0020.00 -93.00-11.0020.00