Как найти элемент массива с максимальным значением - VBA

Формулировка задачи:

Прошу помощи у Уважаемых форумчан. Необходимо найти в Excel элемент массива с максимальным значением, табличка во вложении.

Public Sub ()
Dim I, J As Integer
Dim L(4, 4), M As Single
M = L(4, 4)
    For I = 5 To 8
    For J = 2 To 5
    If L(I, J) > M Then
    M = L(I, J)
    End If
Next
Next
MsgBox ("Значение максимального элемента" & M)
End Sub

С программированием знаком слабо . Подскажите пожалуйста как превратить код в работоспособный.

Решение задачи: «Как найти элемент массива с максимальным значением»

textual
                            Листинг программы 
                        

                            Sub ttt()
    Dim el, m
    For Each el In [b5:e8]
        m = Application.Max(m, el)
    Next
    MsgBox "Значение максимального элемента " & m
End Sub
 
Sub tttt()
    Dim el, m
    For Each el In [b5:e8].Value
        m = Application.Max(m, el)
    Next
    MsgBox "Значение максимального элемента " & m
End Sub
                        