Cách tốt hơn để loại bỏ văn bản trước (các) ký tự cụ thể

Không thường xuyên, tôi cần loại bỏ tất cả các văn bản lên đến và bao gồm một nhân vật nhất định. Ví dụ, trong một danh sách các vụ kiện pháp lý dưới dạng "Nguyên đơn v. Bị đơn", tôi có thể muốn tước bỏ mọi thứ lên đến và bao gồm cả "v." Để có danh sách các bị cáo.

Điều này có thể dễ dàng thực hiện bằng cách sử dụng kết hợp các FIND, RIGHTvà các LENchức năng như sau (sử dụng A1làm ô nơi xuất phát văn bản):

=RIGHT(A1,LEN(A1)-FIND("text",A1)-1)

Nhưng luôn khiến tôi cảm thấy hơi khó hiểu và dễ bị lỗi (chưa kể đến việc tôi thường quên trừ 1. Có cách nào thanh lịch hơn để đạt được kết quả tương tự không?

Sử dụng VBA là một chiến lược hợp pháp! Ẩn những chi tiết đó và gánh nặng của việc nhớ lại chúng. Đồng thời cho phép bạn sử dụng các hàm chuỗi dễ dàng hơn (ví dụ: phiên bản Mid () của VBA không cần số chuỗi con - theo mặc định, nó sẽ cung cấp cho đến cuối chuỗi.) [Lưu ý 1]
Hàm bạn viết trở nên khả dụng cho ứng dụng dễ dàng trong danh sách Excel các chức năng của Excel.

Alt-F11 để vào VBA (Alt-F11 để chuyển trở lại).
Từ VBAProject cho sổ làm việc hiện tại, Chèn> Mô-đun (thao tác menu bên phải). Điều này sẽ có chức năng dễ dàng truy cập trong suốt sổ làm việc của bạn.

Dán cái này:

Hàm RightOfToken (sSource As String, sToken As String) As String
Dim sTarget dưới dạng Chuỗi
Dim iPos là số nguyên

'Trả lại các ký tự sau lần xuất hiện đầu tiên của sToken trong sSource

iPos = InStr (sSource, sToken)
Nếu iPos> 0 thì
    sTarget = Mid (sSource, Len (sToken) + iPos)
Khác
    sTarget = ""
Kết thúc nếu
RightOfToken = sTarget
Chức năng kết thúc

Alt-F11 trở lại. Trong bất kỳ ô nào, = RightofToken ("ABC v. DEF", "v.") Sẽ mang lại "DEF". (Bạn có thể sử dụng LTrim () trong VBA để xóa các khoảng trắng hàng đầu hoặc nếu nó phù hợp với TRIM trong Excel)

[Lưu ý 1] Nếu trong VBA, bạn muốn có phiên bản Excel của hàm hoặc hàm bảng tính dành riêng cho Excel, bạn có thể đặt tiền tố cho nó bằng Application.WorksheetFunction. .

Tìm và thay thế có thể làm việc cho bạn. Đó là cách nhanh nhất. Ví dụ của bạn "muốn loại bỏ mọi thứ lên đến và bao gồm" v. "Để có danh sách các bị cáo", tôi sẽ sao chép thông tin vào một cột mới sau đó đánh dấu chỉ những cột đó. Sau đó sử dụng Tìm và Thay thế hoặc CTRL H.

Trong hộp tìm, nhập "* v." Hoặc " dấu hoa thị v.". Trong hộp thay thế, để trống. (Biểu tượng dấu hoa thị * là một thẻ hoang dã nên nó sẽ chọn mọi thứ trước chữ V.) Nhấp vào ok để chạy và nó sẽ xóa mọi thứ trước đó và bao gồm cả "v.".

Nếu bạn có mọi thứ bạn muốn thay đổi được tô sáng trước, bạn sẽ có thể thực hiện tất cả trong một thao tác rất nhanh.

Hy vọng điều này có ý nghĩa.