VBA encuentra el elemento con el valor absoluto más grande en una matriz y devuelve el subíndice.
Para i = LBound(arr) a UBound(arr)
Si abs(Mx) < Abs(arr(i)) entonces Mx = arr(i): n = i
Siguiente
'Al final del ciclo, Mx será el elemento con el mayor valor absoluto en la matriz, y n será el subíndice'.