Bu öğretici, Sol VBA İşlevinin nasıl kullanılacağını gösterecektir.
Sol İşlev
VBA Left işlevi, bir dizeden ilk n karakteri döndürür.
VBA Sol İşlev n İlk Karakterler
VBA Left işlevi, bir dizeden ilk n karakteri döndürür:
| 123456 | Alt SolÖrnek_1()MsgBox Left("ABCDEFGHI", 4) 'Sonuç: "ABCD"MsgBox Left("ABCDEFGHI", 2) 'Sonuç: "AB"MsgBox Left("ABCDEFGHI", 1) 'Sonuç: "A"MsgBox Left("ABCDEFGHI", 100) 'Sonuç: "ABCDEFGHI"Alt Bitiş |
VBA Sol İşlev n Bir Değişkendeki İlk Karakterler
Yukarıda gösterildiği gibi, yalnızca tırnak içine alınmış metin girerek bir dize tanımlayabilirsiniz. Ancak LEFT İşlevi ayrıca dize değişkenleriyle de çalışacaktır. Bu örnekler, bir dize değişkeninden ilk n karakteri çıkaracaktır.
| 1234567891011 | Alt LeftExample_2()Dim StrEx As String 'Bir dize değişkeni tanımlayınStrEx = "ABCDEFGHI"MsgBox Left(StrEx, 4) 'Sonuç: "ABCD"MsgBox Left(StrEx, 2) 'Sonuç: "AB"MsgBox Left(StrEx, 1) 'Sonuç: "A"MsgBox Left(StrEx, 100) 'Sonuç: "ABCDEFGHI"Alt Bitiş |
VBA Sol İşlev n Hücredeki İlk Karakterler
Dizeler VBA kodunda tanımlanabilir, ancak hücrelerdeki değerleri de kullanabilirsiniz. Bir hücrenin değerini okuyun, onu bir dizge değişkeninde tutun ve bu Çalışma Sayfası Hücresi değerinden ilk n karakteri çıkarın.
| 12345678910111213 | Alt LeftExample_3()Dim StrEx As String 'Bir dize değişkeni tanımlayın'Çalışma sayfasındaki A1 hücresinin değerini okuyun Sayfa1StrEx = ThisWorkbook.Worksheets("Sayfa1").Range("A1").Value'Bu örnek için A1 hücresinin değeri "A bCDEFGHI"MsgBox Left(StrEx, 4) 'Sonuç: "ABCD"MsgBox Left(StrEx, 2) 'Sonuç: "AB"MsgBox Left(StrEx, 1) 'Sonuç: "A"MsgBox Left(StrEx, 100) 'Sonuç: "ABCDEFGHI"Alt Bitiş |
VBA Sol İşlev Son Harfi Kırp
Bir dizenin sonundaki harfleri kaldırmak için LEN İşleviyle birlikte LEFT İşlevini kullanın.
VBA UZUNLUK işlevi, bir dizedeki karakter sayısını sayar:
| 1 | Len(StrEx) |
İşlevleri birleştirerek, dizenin sonundan belirli sayıda karakteri kaldırabiliriz:
| 123456789 | Alt LeftExample_4()Dim StrEx As String 'Bir dize değişkeni tanımlayınStrEx = "ABCDEF"MsgBox Left(StrEx, Len(StrEx)) 'Sonuç: "ABCDEF"MsgBox Left(StrEx, Len(StrEx) - 1) 'Sonuç: "ABCDE"MsgBox Left(StrEx, Len(StrEx) - 2) 'Sonuç: "ABCD"Alt Bitiş |
VBA, Adı Çıkarmak İçin Kaldı
Tam adı olan bir dizeden ilk adı çıkarmak için Instr İşlevi ile birlikte Sol İşlevi kullanın.
VBA Instr işlevi, bir dize içinde bir alt dize arar ve alt dizenin konum numarasını döndürür.
| 1 | InStr(StrEx, " ") |
Fonksiyonları birleştirerek, bir cümleden ilk kelimeyi çıkarabiliriz:
| 12345678910111213141516171819 | Alt LeftExample_5()Dim StrEx As String 'Bir dize değişkeni tanımlayınStrEx = "Alexander Graham Bell"MsgBox Sol(StrEx, InStr(StrEx, " "))'Sonuç: "İskender" (sondaki boşluğa dikkat edin)MsgBox Left(StrEx, InStr(StrEx, " ") - 1)'Sonuç: "İskender" (sonunda boşluk YOK)StrEx = "Leonardo da Vinci"MsgBox InStr(StrEx, " ")'Sonuç: 9 çünkü 9 konumunda boşluk bulunduMsgBox Left(StrEx, InStr(StrEx, " ") - 1)'Sonuç: "Leonardo"Alt Bitiş |
