Tách chuỗi bất kỳ trong Excel bằng VBA một cách nhanh chóng

Video hướng dẫn thực hiện chi tiết

Cách mở chế độ Developers VBA và tạo hàm tách chuỗi

Các bạn khởi động Excel xong, rồi vào menu File -> Options -> Customize Ribbon. Trong khung Main Tabs, các bạn click vào ô Developer -> OK.

Menu Developer cho các nhà phát triển sử dụng VBA có dạng như sau:

Kế đến các bạn nhấn tổ hợp phím Alt+F11 để mở trình soạn code VBA lên, sau đó các bạn vào Insert -> Module và gõ đúng đoạn code sau vào rồi trở về trang tính Excel (Hãy nhớ lưu file - Save để sử dụng lại):

Cách thêm Add-ins A-Tools vào Excel

Link cài đặt Add-ins A-Tools 32bit và 64bit: A-Tools 32bit và A-Tools 64bit (Các bạn vào menu File -> Account -> About Excel để kiểm tra phiên bản Excel, riêng phiên bản Office 2019 chỉ có 64bit)

Excel 2019 chỉ có version 64bit

Thêm A-Tools: Đầu tiên vào menu File -> Options -> Add-ins -> Go như hình bên dưới:

Tiếp theo các bạn tích chọn hết các Add-ins trong hộp thoại cho mình rồi click tiếp OK (Đảm bảo rằng các bạn đã cài đặt các Add-ins theo đường link ở trên):

Sau khi làm xong bước trên ta sẽ có menu A-Tools như sau:

Cách sử dụng hàm tách chuỗi

Giả sử ta có ô A1 có nhiều chuỗi cách nhau bởi dấu xuống dòng như sau (nhấn tổ hợp Alt+Enter để xuống dòng trong cùng 1 ô Cell):

Kế đến các bạn lựa chọn 1 ô rồi gõ công thức sau (trong bài dùng ô B2):

=bs_FillArray(TachChuoi(A1,CHAR(10)),"TP=YES")

Lưu ý rằng ô A1 có thể thay bằng ô khác miễn chứa chuỗi cần tách là được và có dạng như hình phần trên mô tả.

Nếu bạn bỏ cụm "TP=YES" tức là gõ như sau:

=bs_FillArray(TachChuoi(A1,CHAR(10))

Kết quả hàm trả về sẽ nằm theo chiều ngang.

Tổng kết

Trên đây là những bước hướng dẫn cơ bản sử dụng kết hợp VBA và Add-ins, nó giúp ta sử dụng Excel 1 cách hiệu quả hơn trong các tình huống khác nhau. Hãy đánh giá và nhận xét góp ý cho bài viết vì nó là miễn phí!

Chúc các bạn thành công!!!