Tek Değişken Tip
VBA Bekar veri türü, ondalık basamak gerektiren sayıları depolamak için kullanılır. Negatif değerler için -3.4028235E+38'den -1.401298E-45'e ve pozitif değerler için 1.401298E-45'ten 3.4028235E+38'e kadar saklayabilir.
Tek bir değişken bildirmek için Dim İfadesini kullanırsınız (Boyut'un kısaltması):
1 | Dim sngA olarak Single |
Ardından, bir değişkene değer atamak için eşittir işaretini kullanmanız yeterlidir:
1 | sngA = 3658.25 |
Bunu bir prosedüre koymak şöyle görünür:
12345678 | Alt sngÖrnek()'çift değişkeni bildirDim sngA olarak Single'çift değişkeni doldurunsngA = 3658.25'mesaj kutusunu gösterMsgBox sngAAlt Bitiş |
Yukarıdaki kodu çalıştırırsanız, aşağıdaki mesaj kutusu gösterilecektir.
Çift Veri Türü
Double veri türü, yalnızca daha uzun bir sürümüdür. Bekar veri tipi. Bu nedenle, bir prosedürde kullanıldığında yuvarlamayı etkileyebilir. Bekar veri türü 4 ondalık basamağa yuvarlanacak, Çift data Type 12 ondalık basamağa yuvarlanacaktır. 4'ten fazla ondalık basamağa ihtiyacınız varsa, Double veri türünü kullanabilirsiniz.
Int veya Uzun Veri Türleri
Ondalık basamağa ihtiyacınız yoksa, Int veri türünü veya Uzun veri türünü kullanabilirsiniz.
1 | Tamsayı olarak Dim intA |
1 | Uzun olarak Dim lngB |
VBA Programlama | Code Generator sizin için çalışıyor!
Modül veya Global Düzeyde Tek Değişken Bildirme
Önceki örneklerde, Bekar bir prosedür içinde değişkendir. Bir prosedürle bildirilen değişkenler yalnızca o prosedür içinde kullanılabilir.
Bunun yerine, modül veya global düzeyde Single değişkenleri bildirebilirsiniz.
Modül Seviyesi
Modül seviyesi değişkenler, kod modüllerinin en üstünde şu şekilde bildirilir: loş Beyan.
Bu değişkenler, o kod modülündeki herhangi bir prosedürle kullanılabilir.
Küresel düzey
Küresel düzey değişkenler ayrıca kod modüllerinin en üstünde bildirilir. Ancak, kullanmak yerine loş ifadesini kullanın Halk olduğunu belirtmek için açıklama Bekar değişken, VBA Projeniz boyunca kullanılmak üzere mevcuttur.
1 | Tek Olarak Herkese Açık SngA |
beyan edecek olsaydınız Bekar bir modül düzeyinde değişken ve ardından farklı bir modülde kullanmayı deneyin, bir hata oluşur.
Ancak, şunu bildirmek için Public anahtar sözcüğünü kullanmış olsaydınız, Bekar değişken, hata oluşmayacak ve prosedür mükemmel bir şekilde çalışacaktır.
VBA Kodu Örnekleri Aramaktan Bıktınız mı? AutoMacro'yu deneyin!
Tek Kayıtlı Dize Olarak Biçimlendir
Tek bir veri türünü bir dizeye biçimlendirmek istediğiniz bir zaman olabilir - örneğin, bir para birimi simgesi görüntülemek ve sayıyı 2 ondalık basamağa yuvarlamak isteyebilirsiniz.
Bunu başarmak için Biçim işlevini kullanırsınız.
Aşağıdaki prosedür
1234567891011 | Alt TestSingleToCurrencyString()'dize değişkenini bildirDim strMoney As String'tek'i ilan et ve değeri doldurDim sngValue As SinglesngValue = 44055.256'single'yi 2 ondalık basamaklı bir para birimi sembolü olan bir dizgeye dönüştürünstrMoney = Format(sngValue , "$#,##0.00")'sonucu görmekMsgBox strMoneyAlt Bitiş |
bu sonucu döndürürdü:
Benzer şekilde, bir numarayı biçimlendirilmiş bir telefon numarası olarak görüntülemek isteyebilirsiniz.
Bu prosedür:
1234567891011 | Alt TestSingleToPhone()'dize değişkenini bildirDim strPhone As String'tek'i ilan et ve değeri doldurDim sglValue Tek olaraksglDeğeri = 555968541'single'yi para birimi simgesi olan bir dizgeye dönüştürünstrPhone = Format(sglValue , "(000)-000 0000")'sonucu görmekMsgBox strTelefonAlt Bitiş |
bu sonucu döndürürdü: