Trong bài viết hôm nay, chúng tôi sẽ giới thiệu cho bạn 2 phương pháp nhanh chóng và hiệu quả để đếm số lượng dấu đầu dòng trong tài liệu Word của bạn.
Thỉnh thoảng, chúng tôi sử dụng danh sách có dấu đầu dòng hoặc được đánh số trong tài liệu của mình để sắp xếp các mục. Nói chung, một gạch đầu dòng hoặc một con số dẫn dắt một mục riêng lẻ, có thể là một từ, một cụm từ hoặc một câu. Bây giờ nếu bạn có một danh sách được đánh số, sẽ không có vấn đề gì khi tìm ra tổng số mục. Tuy nhiên, nếu có các danh sách có dấu đầu dòng trong tài liệu từ của bạn thì sao? Đơn giản chỉ cần đếm chúng từng cái một nghe có vẻ không hay.
Do đó, trong trường hợp một số bạn có thể cần tính tổng số dấu đầu dòng, đây là 2 cách để giải quyết.
Phương pháp 1: Chuyển đổi danh sách có dấu đầu dòng thành danh sách được đánh số
- Đầu tiên, chọn danh sách mà bạn muốn lấy số đầu dòng.
- Sau đó nhấp vào “Đánh số” trong nhóm “Đoạn văn” dưới tab “Trang chủ”. Danh sách gạch đầu dòng sẽ thay đổi thành một danh sách được đánh số.
Hoặc bạn cũng có thể nhấp chuột phải vào lựa chọn và di chuyển con trỏ qua tùy chọn “Đánh số”, sau đó di con trỏ lên một trong các kiểu đánh số trên menu mở rộng. Điều này cho phép bạn lấy số lượng dấu đầu dòng mà không thực sự chuyển đổi danh sách dấu đầu dòng thành danh sách được đánh số.
Nhân tiện, nếu bạn cần đếm số dấu đầu dòng của toàn bộ tài liệu, bạn chỉ cần đặt con trỏ trong một danh sách dấu đầu dòng, rồi làm theo các bước trên. Bạn sẽ thấy tất cả các danh sách có dấu đầu dòng trong tệp đã được chuyển đổi thành danh sách được đánh số với các số theo thứ tự, chẳng hạn như bên dưới:
Cách 2: Sử dụng Macro
- Để bắt đầu, nếu bạn muốn lấy các dấu đầu dòng của một danh sách cụ thể, hãy chọn danh sách đó. Mặt khác, để đếm số lượng dấu đầu dòng trong toàn bộ tài liệu, bạn nên nhấn “Ctrl + A” để chọn nó.
- Tiếp theo, nhấp vào tab "Nhà phát triển".
- Sau đó nhấp vào “Visual Basic” để mở trình chỉnh sửa VBA. Tổ hợp phím tắt là “Alt + F11”.
- Bây giờ hãy nhấp vào “Bình thường” rồi “Chèn”.
- Chọn “Mô-đun” tiếp theo.
- Nhấp đúp chuột vào mô-đun mới và dán các mã này vào khu vực chỉnh sửa:
Sub GetNumberOfBullets()
Dim objRange As Range
Dim objParagraph As Paragraph
Dim nNumber As Integer
' Initialization
Set objRange = Selection.Range
nNumber = 0
For Each objParagraph In objRange.Paragraphs
If objParagraph.Range.ListFormat.ListType = WdListType.wdListBullet Then
nNumber = nNumber + 1
End If
Next objParagraph
' Pop up a message box to show the total number of bullets.
MsgBox ("Bullet number:" & nNumber)
End Sub
- Cuối cùng, nhấp vào “Chạy”.
Bạn sẽ thấy một hộp thông báo bật lên, hiển thị kết quả.
Quản lý tốt tệp của bạn
Chúng tôi xử lý một số lượng lớn tài liệu Word trong quá trình làm việc, chúng tôi khuyên bạn nên xử lý chúng cẩn thận, vì bất kỳ sai sót nào cũng có thể dẫn đến hỏng hóc. Và trong trường hợp xảy ra hư hỏng tập tin, bạn sẽ cần một Công cụ khôi phục tài liệu Word để giúp bạn giải quyết vấn đề.
Giới thiệu tác giả:
Vera Chen là một chuyên gia phục hồi dữ liệu trong DataNumen, Inc., công ty hàng đầu thế giới về công nghệ khôi phục dữ liệu, bao gồm công cụ sửa lỗi dữ liệu xls và pdf sửa chữa các sản phẩm phần mềm. Để biết thêm thông tin, hãy truy cập www.datanumennăm