Sıralama Fonksiyonu Makro

SIRALAMA Fonksiyonunun Makro Yazımı

RANK fonksiyonunu kullanarak bir değerin herhangi bir seride kaçıncı sırada yer aldığının rahatlıkla kontrol edilebileceği bir makro örneği.

AMAÇ

Bir değerin, bir seri içindeki sıra numarasını veren makro.

FORMÜL

Application.WorksheetFunction.Rank

ÖRNEK

Aşağıdaki örnekte H39’daki değerin, H1:H100 serisi içinde kaçıncı sırada olduğunu öğrenebiliyoruz.

Sub sıralama()

Dim et As Double

et = Application.WorksheetFunction.Rank(Sheets("Sayfa1").Range("H39"), Sheets("Sayfa1").Range("H1:H100"))

End Sub