VBA Large formel virker ikke

Jeg bruger Excel 2013,

Jeg anvender 2-vejs Large Formula VBA, men virker ikke, hvad jeg tager fejl, ved jeg ikke

Sub Macro1 ()
'1st Table Dim sætning ---> Erklærer variable
Dim lRække så længe, ​​lCol så lang
lRække = Range("D5").End(xlNed).Række
lCol = Range("C5").End(xlToRight).Column

'Søjleoptælling i antal
Dim k Så længe, ​​m Så længe
k = Range("C5", Range("C5").End(xlToRight)).Columns.Count
'Rækketælling i antal
m = Range("D6", Range("D6").End(xlDown)).Rows.Count

Dim MyRange As Range
Indstil MyRange = Range(Range("D5").Offset(1, k + 3), Range("D5").Offset(m, k + 3))

Range("D5").Offset(2, 1 + 3).Formel = "=LARGE(" & MyRange & ",1)"

'Og

'=(LARGE($I$6:$I$12,1)-I7)/2
Range("D5").Offset(2, 1 + 3). Formel = "=(LARGE(" & MyRange & ",1)-" & Range("D5").Offset(1, k + 3) & ")/2"

End Sub

Venligst hjælp mig og tak for forhånd