Vba kullanarak sekme karakteri nasıl belirlenir (örneklerle)
VBA’yı kullanarak sekme karakterini belirtmenin iki yolu vardır:
- vbTab
- Chr(9)
Bu iki sabit VBA’da bir sekme karakterini temsil eder.
Aşağıdaki örnekte bu sabitlerin her birinin pratikte nasıl kullanılacağı gösterilmektedir.
Örnek: VBA Kullanarak Sekme Karakterini Belirleme
Excel’de aşağıdaki ad ve soyad listesine sahip olduğumuzu varsayalım:
Diyelim ki, bu ad ve soyadların her birini aralarında bir sekme ile görüntüleyen bir mesaj kutusu oluşturmak için VBA’yı kullanmak istiyoruz.
Bunun için aşağıdaki makroyu oluşturabiliriz:
SubUseTab ()
Dim i As Integer
Dim AllNames As String
For i = 2 To 11
AllNames = AllNames & Range("A" & i).Value & vbTab & Range("B" & i).Value & vbNewLine
Next i
MsgBox AllNames
End Sub
Bu makroyu çalıştırdığımızda çıktı olarak aşağıdaki mesaj kutusunu alırız:
Her satırdaki adı ve soyadını bir sekmeyle birleştirmek için vbTab kullandığımızı unutmayın.
Daha sonra her yeni adı mesaj kutusundaki yeni bir satıra eklemek için vbNewLine sabitini kullandık.
Eğer isteseydik chr(9)’ u da sekme karakteri belirtmek için kullanabilirdik:
SubUseTab ()
Dim i As Integer
Dim AllNames As String
For i = 2 To 11
AllNames = AllNames & Range("A" & i).Value & chr(9) & Range("B" & i).Value & vbNewLine
Next i
MsgBox AllNames
End Sub
Bu makroyu çalıştırdığımızda çıktı olarak aşağıdaki mesaj kutusunu alırız:
VbTab ve chr(9)’un her ikisinin de aynı sonuçları ürettiğini unutmayın.
Ek kaynaklar
Aşağıdaki eğitimlerde VBA’da diğer ortak görevlerin nasıl gerçekleştirileceği açıklanmaktadır:
VBA’da string’i int’ye dönüştürme
VBA’da bir dize ikiye nasıl dönüştürülür
Dizenin VBA’da başka bir dize içerip içermediği nasıl kontrol edilir