VBA Biçim Numarası - VBA NumberFormat ile Sayılar Nasıl Biçimlendirilir?

VBA'daki format fonksiyonu, verilen değerleri istenen formatta formatlamak için kullanılır, bu fonksiyonun temelde iki zorunlu argümanı vardır, biri string şeklinde alınan girdi ve ikinci argüman kullanmak istediğimiz format türüdür. örneğin Biçim (.99, "Yüzde") kullanırsak, bu bize sonucu% 99 olarak verecektir.

VBA Excel'de Biçim Numarası

VBA, normal excel işlevlerinin çok ilerisindedir. VBA, çalışma sayfasında 500'den fazla işlemimiz olduğu gibi yerleşik işlevlerinin çoğuna sahiptir. VBA'da böyle bir formül "Biçim Numarası" dır .

Evet, doğru duydunuz. VBA'da “FormatNumber” adlı bir fonksiyonumuz var . Bu yazıda, yalnızca bu işlevi eksiksiz bir şekilde inceleyeceğiz.

VBA NumberFormat ile Sayılar Nasıl Biçimlendirilir?

İşlev adından da anlaşılacağı gibi, verilen sayıyı kullanıcı tarafından verilen biçimlendirme talimatlarına göre biçimlendirecektir.

Sayı biçimlendirme, ondalık noktalar eklemekten, negatif sayıları parantez içine almaktan, ondalık değerler için baştaki sıfırları göstermekten başka bir şey değildir. VBA FormatNumber işlevini kullanarak , çalıştığımız sayılara biçimlendirme stilini uygulayabiliriz. Fonksiyonun sözdizimi aşağıdadır

  • İfade: Bu, biçimlendirmemiz gereken sayıdan başka bir şey değildir.
  • Ondalık Sonrası Sayı: Sayının sağ tarafında ondalık konum için kaç basamak istediğinizi belirtir.
  • Baştaki Basamağı Dahil Et: Baştaki basamak, sayı başlamadan önceki basamaktan başka bir şey değildir. Bu, 1'den küçük ancak -1'den büyük değerler için geçerlidir.
    • Ondalık değerden önce sıfırı göstermek istiyorsanız, bağımsız değişkeni DOĞRU veya -1 olarak iletebilirsiniz ve sonuç olacaktır. "0,55"
    • Ondalık değerden önce sıfırı göstermek istemiyorsanız, bağımsız değişkeni YANLIŞ veya 0 olarak iletebilirsiniz ve sonuç ".55" olur.
    • Varsayılan olarak, değer -2, yani bölgesel bilgisayar ayarları olacaktır.
  • Negatif Sayılar için Ebeveynleri Kullanın: Negatif sayıları parantez içinde göstermek isterseniz, bağımsız değişkeni DOĞRU veya -1 olarak iletebilirsiniz ve sonuç olacaktır. "(255)"
    • Negatif sayıları parantez olmadan göstermek isterseniz, bağımsız değişkeni YANLIŞ veya 0 olarak iletebilirsiniz ve sonuç olacaktır. "-255."
  • Grup Basamakları: Binlik ayırıcı eklemek isteyip istemediğiniz. Eğer evet ise, DOĞRU veya -1 bağımsız değişkendir. Değilse, FALSE veya 0 argümandır. Varsayılan olarak değer -2'dir, yani bölgesel bilgisayar ayarlarına eşittir.

Excel VBA FormatNumber İşlevi Örnekleri

Excel VBA Biçim Numarası işlevinin pratik örneklerini göreceğiz. Her argümanı ayrı ayrı yapacağız.

Bu amaçla, makro adını oluşturun ve değişkenlerden birini dizge olarak bildirin. Değişkeni bir dizge olarak rapor etmemiz gerekir çünkü VBA işlevi FormatNumber tarafından verilen sonuç yalnızca String olarak verilir.

Kod:

Alt Format_Number_Example1 () Dim MyNum As String End Sub

Örnek 1 - Sayının Önüne Ondalık Nokta Ekleme

Adım # 1 - 25000 sayısıyla çalıştığımızı ve onu biçimlendirmemiz ve sayının sağına ondalık noktalar eklememiz gerektiğini varsayalım. Değişkenimize bir değer atayın.

Kod:

Alt Format_Number_Example1 () Dim MyNum As String MyNum = FormatNumber (End Sub

Adım # 2 - İlk önce bir ifadedir, yani biçimlendirmemiz gereken sayı, yani numaramız 25000.

Kod:

Alt Format_Number_Example1 () Dim MyNum As String MyNum = FormatNumber (25000, End Sub

Adım 3 - Sırada kaç basamak eklememiz gerekiyor, yani 2 sayı.

Kod:

Sub Format_Number_Example1 () Dim MyNum As String MyNum = FormatNumber (25000, 2) End Sub

Adım # 4 - Değişkenin değerini VBA mesaj kutusunda gösterin.

Kod:

Alt Format_Number_Example1 () Dim MyNum As String MyNum = FormatNum (25000, 2) MsgBox MyNum End Sub

Adım # 5 - Bu makronun sonucu şu şekildedir.

Sayının sağında iki ondalık sayı görebiliriz.

Örnek 2 - Grup Numarası, yani Bin Ayırıcı

Aynı numara için bin ayırıcı ekleyebilir veya silebiliriz. Bin ayırıcı göstermek istiyorsak , son argüman için vbTrue seçmemiz gerekir .

Kod:

Alt Format_Number_Example1 () Dim MyNum As String MyNum = FormatNumber (25000, 2,,, vbTrue) MsgBox MyNum End Sub

Bu sonucu böyle atacak.

Şimdi, vbFalse seçerseniz, bin ayırıcı almayacağız.

Kod:

Alt Format_Number_Example1 () Dim MyNum As String MyNum = FormatNumber (25000, 2,,, vbFalse) MsgBox MyNum End Sub

Bu kodun sonucu şöyle.

Ben seçerseniz vbUseDefault, biz sistem ayarı olarak sonuç almak. Bunun sonucu aşağıdadır.

Sistem ayarımın varsayılan olarak bin ayırıcısı var.

Örnek 3 - Negatif Sayılar İçin Parantez İçer

Zararlı bir sayımız varsa, negatif sayıyı parantez içinde gösterebiliriz. "Negatif Sayılar için Ebeveynleri Kullan" altında vbTrue'yu seçmemiz gerekiyor .

Kod:

Alt Format_Number_Example1 () Dim MyNum As String MyNum = FormatNumber (-25000, 2,, vbTrue) MsgBox MyNum End Sub

Şimdi sonuç böyle.

Biz seçerseniz vbFalse, biz bir eksi işareti negatif bir sayı olacaktır.

Kod:

Alt Format_Number_Example1 () Dim MyNum As String MyNum = FormatNumber (-25000, 2,, vbFalse) MsgBox MyNum End Sub

Şimdi sonuç böyle.

Ilginç makaleler...