Dưới đây là một số hàm xử lý ký tự phổ biến trong VBA, rất hữu ích khi làm việc với chuỗi:
Trả về độ dài (số ký tự) của chuỗi.
Debug.Print Len("Hello") ' Kết quả: 5
Lấy ký tự bên trái của chuỗi.
Debug.Print Left("Hello", 2) ' Kết quả: He
Lấy ký tự bên phải của chuỗi.
Debug.Print Right("Hello", 3) ' Kết quả: llo
Lấy chuỗi con từ vị trí bất kỳ.
Debug.Print Mid("Hello", 2, 3) ' Kết quả: ell
Tìm vị trí xuất hiện đầu tiên của chuỗi con.
Debug.Print InStr("Hello World", "World") ' Kết quả: 7
Thay thế chuỗi con trong chuỗi chính.
Debug.Print Replace("Hello World", "World", "VBA") ' Kết quả: Hello VBA
Chuyển chuỗi thành chữ hoa / chữ thường.
Debug.Print UCase("hello") ' HELLO
Debug.Print LCase("HELLO") ' hello
Xoá khoảng trắng thừa.
Debug.Print Trim(" abc ") ' abc
Debug.Print LTrim(" abc") ' abc
Debug.Print RTrim("abc ") ' abc
Hàm Split được dùng để tách chuỗi thành mảng con dựa trên một ký tự phân cách.
Split(expression, [delimiter], [limit], [compare])
expression: Chuỗi cần tách (bắt buộc).
delimiter: Ký tự phân tách (mặc định là dấu cách " ").
limit: Số phần tử tối đa muốn tách (tùy chọn).
compare: Cách so sánh chuỗi (vbBinaryCompare hoặc vbTextCompare – tùy chọn).
Dim arr() As String
arr = Split("a,b,c,d", ",")
Dim i As Integer
For i = 0 To UBound(arr)
Debug.Print arr(i)
Next i
Kết quả trong cửa sổ Immediate:
a
b
c
d
Dim words() As String
words = Split("Học VBA thật dễ", " ")
Debug.Print words(0) ' Học
Debug.Print words(1) ' VBA
Debug.Print words(2) ' thật
Debug.Print words(3) ' dễ
Tìm kiếm:
Thực hành một số hàm về ký tự và chuổi trong VBA