Excel VBA VarType İşlevi
VBA VARTYPE , "Değişken Tür" anlamına gelir. Bu işlev, belirli değişkene atanan veri türünü belirlememize yardımcı olur veya basit bir deyişle, değişkene ne tür bir değerin depolandığını veya atandığını bulduğunu söyleyebiliriz.
Sözdizimi
VarName: Verilen değişken adında saklanan verileri bulmak için sadece değişken adını sağlamamız gerekiyor.
Dolayısıyla, değişken adını sözdizimi veya bağımsız değişken olarak alır ve çıktıda değişkene atanan veri türünü veya değişkende depolanan veri türünü döndürür.
Dolayısıyla, değişken veri türünü veya değişkene atanan veri türünü nasıl bulacağınızı merak ettiyseniz, burada bir VBA işlevi olan "VarType" var.
Örnekler
Örnek 1
VBA'da kodu yazarken genellikle değişkenleri açıklıyoruz ve bunlara bir veri türü atıyoruz. Örneğin, aşağıdaki VBA koduna bakın.
Kod:
Alt VarType_Example () Dim MyVar As String MyVar = "Merhaba" Son Alt
Yukarıdaki örnekte, değişkeni "String" olarak tanımladık ve bu dizge için değeri "Merhaba" olarak atadık.
Bu basit bir durumdur, ancak değişkenleri onlara atamadan da bildirmek mümkündür, bu nedenle bu gibi durumlarda VarType işlevi bize yardımcı olur.
Kod:
Alt VarType_Example () Dim MyVar MyVar = "Merhaba" Son Alt
Yukarıdaki kodda, herhangi bir veri türü atamadık, ancak değeri hemen "Merhaba" olarak atadık, bu nedenle VarType işlevini kullanarak değişkenin veri türünü bulabiliriz.
Yukarıdaki kodda VBA kodlamasında MSGBOX'u açın.
Ardından VarType işlevini açın.
Şimdi değişken adını VARTYPE işlevinin bağımsız değişkeni olarak girin.
Kod:
Alt VarType_Example () Dim MyVar MyVar = "Merhaba" MsgBox VarType (MyVar) End Sub
Şimdi kodu çalıştırın ve mesaj kutusuna ne aldığımızı görün.
Sonucu 8 olarak aldık çünkü VBA her tür değişken veri türü için belirli kodlara sahip, bu nedenle aşağıda sizin için ayrıntılı liste var.
| Değer | Sabit | Açıklama | ||
| 0 | vbEmpty | Değişken henüz başlatılmadı | ||
| 1 | vbNull | Geçerli olmayan veri atandı | ||
| 2 | vbInteger | Değişken değeri "Tamsayı" veri türüdür | ||
| 3 | vbLong | Değişken değeri "Uzun" veri türüdür | ||
| 4 | vbSingle | Değişken değeri "Tek" veri türüdür | ||
| 5 | vbDouble | Değişken değeri "Double" veri türüdür | ||
| 6 | vbCurrency | Değişken değeri "Para Birimi" veri türüdür | ||
| 7 | vbDate | Değişken değeri "Tarih" veri türüdür | ||
| 8 | vbString | Değişken değeri "Dize" veri türüdür | ||
| 9 | vbObject | Değişken değeri "Nesne" veri türüdür | ||
| 10 | vbError | Değişken değeri Hata Değeridir | ||
| 11 | vbBoolean | Değişken değeri "Boole" veri türüdür | ||
| 12 | vbVariant | Değişken değeri "Variant" veri türüdür (yalnızca varyant dizileriyle kullanılır) | ||
| 13 | vbDataObject | Değişken değeri Veri Erişim Nesnesidir | ||
| 14 | vbDecimal | Değişken değeri "Ondalık" veri türüdür | ||
| 17 | vbByte | Değişken değeri "Byte" veri türüdür | ||
| 20 | vbLongLong | Değişken değeri "LONG LONG" veri türüdür (yalnızca 64 bit platformlarda geçerlidir) | ||
| 36 | vbUserDefinedType | Değişken değeri "Kullanıcı Tanımlı" veri türüdür | ||
| 8192 | vbArray | Değişken değeri Array'dir. |
Tamam, şimdi kodumuz değişken veri türünü 8 olarak yeniden ayarladı, yani "MyVar" değişken adı "String" veri türünü içeriyor.
Örnek 2
Şimdi aşağıdaki koda bakın.
Kod:
Alt VarType_Example2 () Dim MyVar Set MyVar = ThisWorkbook MsgBox VarType (MyVar) End Sub
Bu kodu çalıştıralım ve sonucun ne olduğunu görelim.
Sonuç 9'dur, yani değişken "Object" veri türünü içerir. Evet, bu doğru çünkü "MyVar" değişkeni için "Bu Çalışma Kitabı" nın çalışma kitabı referansını ayarladık.
Örnek 3
Şimdi aşağıdaki koda bakın.
Kod:
Alt VarType_Example3 () Dim MyVar MyVar = 32500 MsgBox VarType (MyVar) End Sub
Bu, sonucu 2 olarak döndürecektir.
Çünkü değişkene atanan 32500 sayısı bir “Tamsayı” değeridir.
Şimdi değeri 40000 olarak değiştirip sonucu göreceğim.
Kod:
Alt VarType_Example4 () Dim MyVar MyVar = 40000 MsgBox VarType (MyVar) End Sub
Bu, sonucu 3 olarak verecektir.
Tamsayı değeri 32767 ile bittiği için, bunun üzerindeki her şey VBA LONG veri türü olarak değerlendirilecektir.
Şimdi numarayı çift tırnak içine alacağım.
Kod:
Alt VarType_Example5 () Dim MyVar MyVar = "40000" MsgBox VarType (MyVar) End Sub
Kodu çalıştırın ve sonucu görün.
Sonucu 8, yani String veri türü olarak aldık.
Bunun nedeni, parantez içinde sağlanan her şeyin bir String değişkeni olarak değerlendirilmesidir.
Hatırlanacak şeyler
- VARTYPE, "Değişken Tür" anlamına gelir.
- Veri Türü benzersiz sayılarla temsil edilir, bu nedenle hangi sayının hangi değişken veri türünü temsil ettiğini anlamak için tabloya bakın.
