.st0{fill:#FFFFFF;}

Hướng dẫn xoá nhanh phần văn bản trước/sau một ký tự cụ thể trong Excel 

 Tháng Chín 19, 2021

By  Lê Đình Chi

Find & Replace là một tính năng được sử dụng rộng rãi trong Excel. Bằng công cụ này, bạn có thể xóa đoạn văn bản trước/sau một ký tự cụ thể.

Nhấn Ctrl + F để mở hộp thoại Find & Replace, nhấp vào thẻ Replace, gõ *, vào hộp Find What, để trống hộp Replace with, sau đó nhấn Replace All.

Bây giờ, bạn thấy đoạn văn bản đằng trước dấu phẩy đã được xóa.

Chú ý.

  1. Nếu bạn muốn xóa đoạn văn bản sau dấu phẩy, hãy gõ ,* vào ô Find what.
  2. Bạn có thể thay đổi dấu phẩy thành ký tự khác.
  3. Phương pháp này sẽ xóa tất cả phần văn bản đằng trước dấu phẩy cuối cùng trong ô tính được chỉ định.

Trong Excel, bạn cũng có thể sử dụng dấu phẩy để xóa phần văn bản trước/sau một ký tự cụ thể bằng việc  sử dùng các hàm Left và Right như sau:

  1. Chọn một ô trống và gõ công thức =RIGHT(A1,LEN(A1)-FIND(“,”,A1)), nhấn Enter.

  1. Sao chép công thức xuống các dòng trước khi tất cả phần văn bản trước dấu phẩy được loại bỏ.

Chú ý.

  1. Loại bỏ văn bản sau dấu phẩy bằng =LEFT(A1,FIND(“,”,A1)-1)
  2. Trong công thức, A1 là ô tính bạn muốn loại bỏ đoạn văn bản, và ‘,’ là ký tự bạn muốn loại bỏ phần văn bản trước/sau nó.
  3. =RIGHT(A1,LEN(A1)-FIND(“,”,A1)) sẽ loại bỏ tất cả văn bản đằng trước dấu phẩy thứ nhất trong ô A1, trong khi =LEFT(A1,FIND(“,”,A1)-1) sẽ loại bỏ tất cả văn bản đằng sau dấu phẩy thứ nhất trong ô A1.
  1. Nhấn Alt + F11 để mở hộp thoại Microsoft Visual Basic for Applications.
  2. Trong cửa sổ, nhấn Insert > Module để mở cửa sổ Module mới, sau đó sao chép đoạn mã VBA sau vào cửa sổ Module.

Sub RemoveAllButLastWord()

'Updateby20140612

Dim Rng As Range

Dim WorkRng As Range

Dim xChar As String

On Error Resume Next

xTitleId = "KutoolsforExcel"

Set WorkRng = Application.Selection

Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)

xChar = Application.InputBox("String", xTitleId, "", Type:=2)

For Each Rng In WorkRng

    xValue = Rng.Value

    Rng.Value = VBA.Right(xValue, VBA.Len(xValue) - VBA.InStrRev(xValue, xChar))

Next

End Sub

  1. Nhấn nút Run. Một hộp thoại hiện ra yêu cầu bạn nhập vào một ô hay vùng dữ liệu bạn muốn xóa đoạn văn bản trước dấu phẩy, nhấn OK.

4. Sau đó hộp thoại biến mất, nhập ký tự bạn muốn xóa văn bản dựa vào nó, nhấn OK.

Bây giờ, tất cả văn bản trước dấu phẩy đều được xóa ngay lập tức.

Chú ý. VBA chỉ xóa phần văn bản trước ký tự cuối cùng (ví dụ dấu phẩy) trong ô được chỉ định.

Excel rất nhiều ứng dụng mà có thể bạn chưa biết phải không? Excel còn vô vàn tính năng khác mà bạn nên biết để có kết quả công việc khác. Nếu bạn đang gặp khó khăn trong việc học Excel, hãy tham khảo khóa học EX101 – Excel từ cơ bản tới chuyên gia của zik.vn. Tại khóa học này, bạn sẽ được học toàn bộ kiến thức về Excel từ cơ bản đến nâng cao qua bài giảng của các chuyên gia về Excel một cách đầy đủ và có hệ thống. Chi tiết xem tại:

Đánh giá bài viết này

zik.vn – Nền tảng học online duy nhất tại Việt Nam tập trung vào phát triển kỹ năng làm việc dành cho người đi làm

Với sứ mệnh: Mang cơ hội phát triển kỹ năng, phát triển nghề nghiệp tới hàng triệu người”, đội ngũ phát triển zik.vn đã và đang làm việc với những học viện, trung tâm đào tạo, các chuyên gia đầu ngành để nghiên cứu và xây dựng lên các chương trình đào tạo từ cơ bản đến chuyên sâu xung quanh các lĩnh vực: Tin học văn phòng, Phân tích dữ liệu, Thiết kế, Công nghệ thông tin, Kinh doanh, Marketing, Quản lý dự án…

Zik.vn tự hào khi được đồng hành cùng:

  • 50+ khách hàng doanh nghiệp lớn trong nhiều lĩnh vực như: Vietinbank, Vietcombank, BIDV, VP Bank, TH True Milk, VNPT, FPT Software, Samsung SDIV, Ajinomoto Việt Nam, Messer,…
  • 100.000+ học viên trên khắp Việt Nam

Tìm hiểu ngay các khóa học của Zik.vn TẠI ĐÂY



Lê Đình Chi


Your Signature

{"email":"Email address invalid","url":"Website address invalid","required":"Required field missing"}

Subscribe to our newsletter now!

DMCA.com Protection Status
>