makroda hazır fonksiyonlar için değişken nesne oluşturma!

[cozmic_power]

makroda kullandığım excel hazır fonksiyonları var.Mesala
Application.WorksheetFunction.Small([O12:O70], 1)

buradaki small bazı yerine bir nesne tanımlaya bilirmiyim.şöyleki
a=small
b=large
Application.WorksheetFunction.a([O12:O70], 1)

Application.WorksheetFunction.b([O12:O70], 1)
gibi yazmam mümkünmüdür.Teşekkür ederim..

 

[AS3434]

Sayın cozmic_power

O şekilde değilde, Small ve Large fonksiyonlarını bir değişkene atayarak kullanabilirsiniz.

Sub Makro1()
a = Application.WorksheetFunction.Large([b1:b7], 1)
b = Application.WorksheetFunction.Small([b1:b7], 1)
If a > 10 Then
[e3] = a
Else
[e3] = b
End If
End Sub

gibi.


.

 

[Levent Menteşoğlu]

Alternatif olarak aşağıdaki gibi deneyin.

Evaluate(a & "(O12:O70,1)")
Evaluate(b & "(O12:O70,1)")

 

[cozmic_power]

Teşşekkür ederim