Microsoft Excel'de VBA Kullanan Bir Hücreden Yalnızca Sayıyı Çıkarmak için UDF
Bu yazıda, kullanıcı tanımlı işleve sahip bir hücreden yalnızca sayı çıkarmak için VBA kodunun nasıl kullanılacağını öğreneceğiz.
Soru): Yalnızca alfa sayısal veriler içeren bir hücreden sayı almak için bir makroya ihtiyacım var.
A sütununun alfanümerik verileri içerdiği ve beklenen sayıların B sütununda olduğu verilerin anlık görüntüsü aşağıdadır.
A sütunundan sadece sayıları almak için; VB editörünü başlatmak için aşağıdaki adımları izlememiz gerekiyor
- Geliştirici sekmesine tıklayın
- Kod grubundan Visual Basic'i seçin
Standart modülde aşağıdaki kodu kopyalayın
İşlev Yalnızca Numeric(mystr As Variant)
Dim myOutput As String, i As Integer
i = 1 To Len(mystr) için
Eğer IsNumeric(Mid(mystr, i, 1)) ise _
myOutput = myOutput & Mid(mystr, i, 1)
Sonraki
NumericOnly = myOutput * 1
Bitiş İşlevi
- B2 hücresindeki çıktıyı almak için formül şudur:
- =Yalnızca Sayısal(A2)
Bu şekilde, VBA kodunu kullanarak yalnızca metin ve sayı içeren bir hücreden sayıları alabiliriz.
İndir - VBA Kullanarak Bir Hücreden Yalnızca Numarayı Ayıklamak için UDF - xlsm