Excel 2013-at használok,
Kétirányúan alkalmazom a Large Formula VBA-t, de nem működik, mit tévedek, nem tudom
Sub Macro1 ()
'1st Table Dim utasítás ---> Deklarálja a változókat
Dim lRow As Long, lCol As Long
lSor = Tartomány("D5").End(xlDown).Sor
lCol = Tartomány("C5").End(xlToRight).Oszlop
„Oszlopszám a számban
Dim k As Long, m As Long
k = Tartomány("C5", Tartomány("C5").End(xlToRight)).Oszlopok.Számlálás
'Sorok száma a számban
m = Tartomány("D6", Tartomány("D6").End(xlDown)).Sorok.Szám.
Dim MyRange As Range
Set MyRange = Tartomány(Tartomány("D5").Eltolás(1, k + 3), Tartomány("D5").Eltolás(m, k + 3))
Tartomány("D5").Eltolás(2, 1 + 3).Formula = "=LARGE(" & Saját tartomány & ",1)"
'És
'=(NAGY($I$6:$I$12,1)-I7)/2
Tartomány("D5").Eltolás(2, 1 + 3).Formula = "=(LARGE(" & Saját tartomány & ",1)-" & Tartomány("D5").Eltolás(1, k + 3) & ")/2"
End Sub
Kérlek segítsetek és köszönöm előre is