korzystam z Excela 2013,

Stosuję dwukierunkową VBA Large Formula, ale nie działa, co się mylę, nie wiem

Sub Macro1 ()
„Pierwsza instrukcja Dim tabeli ---> Deklaruje zmienne
Wym.lRow tak długo, lCol tak długo
lRow = Range("D5").End(xlDown).Row
lKolumna = Zakres("C5").Koniec(xlDoPrawo).Kolumna

„Liczba kolumn w liczbach
Dim k Tak długo, m Tak długo
k = Range("C5", Range("C5").End(xlDoRight)).Kolumny.Liczba
„Liczba wierszy w liczbie
m = Range("D6", Range("D6").End(xlDown).Rows.Count

Przyciemnij mój zakres jako zakres
Set MyRange = Range(Range("D5").Offset(1, k + 3), Range("D5").Offset(m, k + 3))

Zakres("D5").Przesunięcie(2, 1 + 3).Formuła = "=DUŻY(" & MyRange & ",1)"

'I

'=(DUŻA($I$6:$I$12,1)-I7)/2
Zakres("D5").Przesunięcie(2, 1 + 3).Formuła = "=(DUŻY(" & MójZakres & ",1)-" & Zakres("D5").Przesunięcie(1, k + 3) & ")/2"

End Sub

Uprzejmie pomóż mi i dziękuję za zaliczkę