Elzem KTF(UDF)ler

Excel sayfalarında kullandığımız yerleşik fonksiyonlar ya da kendi yazabileceğiniz fonksiyonlar ile ilgili bilmek istedikleriniz, sorunlar ve çözümleri

Cevap: Elzem KTF(UDF)ler

İleti#21)  Tamermaster » 08 Haz 2021 02:02

Sütundaki sayının kaçıncı Büyük/Küçük sayı olduğunu bulan KTF.
Yazdığınız sayının sütundaki kaçıncı küçük sayı olduğunu öğrenmek için B_Yada_K değerine K yazın.
Kod: Tümünü seç
Function KaçıncıBK(ByVal AramaSutunu As Range, ByVal Rakam As Integer, Optional B_Yada_K As String)

Veri = AramaSutunu.Value2
If B_Yada_K = "K" Then
For i = 1 To UBound(Veri)
By = WorksheetFunction.Small(AramaSutunu, i)
If Rakam = By Then
KaçıncıBK = i
End If
Next i
Else
For i = 1 To UBound(Veri)
By = WorksheetFunction.Large(AramaSutunu, i)
If Rakam = By Then
KaçıncıBK = i
End If
Next i
End If
End Function
Kullanıcı avatarı
Tamermaster
Siteye Alışmış
 
Adı Soyadı:Tamer Muhassıl
Kayıt: 25 May 2009 01:04
Konum: İstanbul/Bahçelievler
Meslek: Elektronik
Yaş: 52
İleti: 151
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul/Bahçelievler

Önceki

Forum Kullanıcı Tanımlı Fonksiyonlar ( KTF )

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 1 misafir

Bumerang - Yazarkafe