Như Quỳnh Văn Vũ
Như Quỳnh Văn Vũ
Thảo luận 0 thảo luận
Vỗ tay 0 vỗ tay
Lượt xem 4913 lượt xem

Hướng dẫn xóa tất cả TEXT BOX trong Word bằng VBA

Nov 04 2020

Text Box (Hộp văn bản) được sử dụng khá nhiều trong các bài tập thực hành tin học văn phòng. Ngoài ra, nó cũng là một trong rất nhiều tính năng hữu ích đang được mọi người sử dụng rộng rãi hơn trong tài liệu, văn bản Word của mình. Trong bài viết này, Gitiho sẽ hướng dẫn các bạn cách để xóa các text box trong Word đơn giản bằng VBA.

Xóa từng TEXT BOX trong Word

Đôi khi, bạn chỉ muốn xóa một hoặc hai text box (hộp văn bản) mà thôi thì bạn có thể thao tác theo các bước như sau:

Bước 1: Đầu tiên, bạn hãy click vào bên trong hộp văn bản và nhấn CTRL + C để sao chép văn bản (bạn có thể bỏ qua bước này nếu KHÔNG muốn giữ lại đoạn văn bản).

Bước 2: Tiếp theo, bạn hãy click vào đường viền của text box => nhấn DELETE.


Rất đơn giản phải không nào? Cách này rất hiệu quả đối với số ít text box. Vậy nếu bạn muốn xóa nhiều text box cùng lúc thì sao?

Xóa tất cả TEXT BOX trong Word bằng VBA

Bước 1: Nhấn ALT + F11 để mở cửa sổ VBA trong Word.

Bước 2: Tiếp theo, bạn hãy nhấp chọn tab Insert => Module và chèn mã VBA bến dưới đây vào cửa sổ Module:

Sub Test()
Dim oShp As Word.Shape
Dim i As Long
For i = ActiveDocument.Shapes.Count To 1 Step -1
Set oShp = ActiveDocument.Shapes(i)
If oShp.Type = msoTextBox Then
oShp.Delete
End If
Next i
End Sub

Bước 3: Click vào nút Run để chạy mã VBA (hoặc nhấn F5).

Trên đây là những hướng dẫn về cách xóa TEXT BOX trong Word. Nếu các bạn có thắc mắc gì, đừng ngần ngại để lại comment bên dưới nhé! Gitiho sẽ giải đáp thắc mắc của bạn trong thời gian sớm nhất.

Xem thêm: Tự động hóa Excel với lập trình VBA

Cùng tham gia cộng đồng hỏi đáp về chủ đề Tin học văn phòng

Thảo luận 0 câu trả lời
Lượt xem 4913 lượt xem
Vỗ tay vỗ tay

0 Bình luận

@ 2020 - Bản quyền của Công ty cổ phần công nghệ giáo dục Gitiho Việt Nam
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở kế hoạch và đầu tư TP. Hà Nội