Xem 47,916
Cập nhật thông tin chi tiết về Cách Sử Dụng Hàm Left, Right, Mid Và Len Trong Vba mới nhất ngày 19/05/2022 trên website Trucbachconcert.com. Hy vọng nội dung bài viết sẽ đáp ứng được nhu cầu của bạn, chúng tôi sẽ thường xuyên cập nhật mới nội dung để bạn nhận được thông tin nhanh chóng và chính xác nhất. Cho đến thời điểm hiện tại, bài viết này đã đạt được 47,916 lượt xem.
--- Bài mới hơn ---
Để tách ký tự đầu, cuối hay chỉ định trong Excel, chúng ta hay sử dụng các hàm có sẵn như Left, Right, Mid. Vậy khi thao tác dữ liệu bằng VBA, làm sao bạn có thể tách được chuỗi?.
Thực ra, VBA cũng có các hàm như Left, Right, Mid với chức năng tương tự và bạn có thể tùy biến tách chuỗi theo nhiều cách. Và trong bài viết này mình sẽ chia sẻ với các bạn.
Cú pháp:
Left(String, Length As Long)
Trong đó:
*Vị trí ký tự đầu tiên trong VBA là 1.
Ví dụ:
Sub ham_Left() Dim chuoi As String chuoi="VBA Excel 2013" MsgBox Left(chuoi, 3) End Sub
Kết quả: chạy hàm sẽ tách được “VBA” ra khỏi chuỗi.
Được dùng để tách chuỗi từ bên phải qua trái theo số lượng ký tự được chỉ định.
Cú pháp:
Right(String, Length As Long)
Ví dụ:
Sub ham_Right() Dim chuoi As String chuoi="VBA Excel 2013" MsgBox Right(chuoi, 4) End Sub
Kết quả: chạy hàm sẽ tách được “2013” ra khỏi chuỗi.
Được dùng để tách chuỗi từ một vị trí bất kỳ theo số lượng được chỉ định.
Cú pháp:
Mid(String, Start As Long,[Length])
Trong đó:
- Start As Long: vị trí bắt đầu tách chuỗi.
- Length: độ dài chuỗi cần tách.
Ví dụ:
Sub ham_Mid() Dim chuoi As String chuoi="VBA Excel 2013" MsgBox Mid(chuoi, 5,5) End Sub
Kết quả: chạy hàm sẽ tách được “Excel” ra khỏi chuỗi.
Cách sử dụng hàm Len với các hàm Left, Right, Mid
Hàm Len là hàm lấy độ dài (số ký tự, bao gồm cả khoảng trắng) của chuỗi. Được sử dụng khá nhiều với các hàm kể trên, vì nó giúp linh động xác định được độ dài chuỗi cũng như vị trí bắt đầu.
Cú pháp:
Len(Expssion)
Trong đó:
- Expssion là một chuỗi, định dạng kiểu String hay Var.
Ví dụ 1: Tách “Microsoft” từ chuỗi “Microsoft Excel 2013”
Sub tachchuoi1() Dim chuoi as String chuoi = "Microsoft Excel 2013" MsgBox Left(chuoi, Len("Microsoft")) End Sub
Kết quả trả về là “Microsoft”.
*Vậy lợi ích của hàm Len chính là tự động xác định được chuỗi cần tách mà bạn không cần phải biết trước số ký tự của một chuỗi.
Ví dụ 2: Tách “Excel” từ chuỗi “Microsoft Excel 2013”
Sub tachchuoi2() Dim chuoi As String chuoi = "Microsoft Excel 2013" MsgBox Mid(chuoi, Len("Microsoft") + 2, Len("excel")) End Sub
Phân tích: trong hàm Mid(chuoi, Len(“Microsoft”) + 2, Len(“excel”)) bạn để ý: Len(“Microsoft”) = 9, vì vậy để bắt đầu tại vị trí ký tự của chữ tiếp theo bạn cần cộng thêm 2.
Kết quả trả về là “Excel”.
Ví dụ 3: Tách “2013” bằng hàm Mid từ chuỗi “Microsoft Excel 2013”
Sub tachchuoi3() Dim chuoi As String chuoi = "Microsoft Excel 2013" MsgBox Mid(chuoi, Len("Microsoft Excel") + 2) End Sub
Phân tích: hàm Mid trên không khai báo số ký tự cần tách, như vậy nó sẽ tách chuỗi từ vị trí chỉ định đến cuối chuỗi. Với cách này bạn có thể áp dụng thay cho hàm Right.
Kết quả trả về là “2013”.
Như vậy, bạn đã tìm hiểu qua cách sử dụng các hàm tách chuỗi như Left, Mid, Right và sử dụng Len để linh động xác định vị trí chuỗi cần tách.
--- Bài cũ hơn ---
Bạn đang xem bài viết Cách Sử Dụng Hàm Left, Right, Mid Và Len Trong Vba trên website Trucbachconcert.com. Hy vọng những thông tin mà chúng tôi đã chia sẻ là hữu ích với bạn. Nếu nội dung hay, ý nghĩa bạn hãy chia sẻ với bạn bè của mình và luôn theo dõi, ủng hộ chúng tôi để cập nhật những thông tin mới nhất. Chúc bạn một ngày tốt lành!