InStrRev Function

Chức năng
Trả về vị trí của sự xuất hiện đầu tiên của một chuỗi trong chuỗi khác, bắt đầu tìm kiếm từ cuối của chuỗi về đầu chuỗi.

Cú pháp
InStrRev( string, substring [,start], [compare] )

Trong đó:
     [start]: không bắt buộc, vị trí bắt đầu tìm kiếm.
     string: chuỗi mẹ.
     substring: chuỗi con.
     [compare]: không bắt buộc, so sánh.
     vbBinaryCompare: mặc định, so sánh nhị phân, phân biệt ký tự hoa, thường.
     vbTextCompare: so sánh text, bỏ qua sự phân biệt ký tự hoa, thường.

• Nếu string là "" - InStrRev trả về 0.
• Nếu string là Null - InStrRev trả về Null.
• Nếu substring là "" - InStrRev trả về start.
• Nếu substring là Null - InStrRev trả về Null.
• Nếu substring là không được tìm thấy - InStrRev trả về 0.
• Nếu substring là được tìm thấy trong string- InStrRev trả về vị trí được tìm thấy.
• Nếu start > len(string) - InStrRev trả về 0.
• Chiều tìm kiếm: từ cuối về đầu.
• Chiều đánh số chỉ vị trí: từ đầu về cuối.

Ví Dụ 1

Sub Function_INSTRREV() Debug.Print InStrRev("Hoc Vien VBA Excel", "E", -1, vbBinaryCompare) '14, "a" trong "Van" Debug.Print InStrRev("Hoc Vien VBA Excel", "E", , vbBinaryCompare) '14, "a" trong "Van" Debug.Print InStrRev("Hoc Vien VBA Excel", "E", 13, vbBinaryCompare) '0, khong tim thay "E" trong 13 ky tu dau Debug.Print InStrRev("Hoc Vien VBA Excel", "E", 13, vbTextCompare) '7, "E" trong "Vien" End Sub

Kết quả:
Nhấn Ctrl + G để mở cửa sổ Immediate để xem kết quả.