Cách đếm các chữ cái và chữ số bằng macro
Bạn có thể sử dụng chức năng "Chỉnh sửa - Tìm" để tìm kiếm văn bản, số, chữ cái và chuỗi số cụ thể. Bạn cũng có thể sử dụng macro để tìm kiếm các ký tự trong bảng của mình.
Macro sau đây truy vấn người dùng về một nội dung và tìm kiếm nội dung này trong phạm vi ô đã chọn trước đó. Vì vậy, trước tiên hãy chọn một khu vực trong bảng của bạn và sau đó kích hoạt macro sau:
Ký tự đếm phụ ()
Dim i As Long
Làm mờ vị trí càng lâu
Dấu mờ dưới dạng chuỗi
Làm mờ ô dưới dạng phạm vi
Làm mờ một chuỗi dưới dạng
Character = InputBox ("Bạn muốn đếm ký tự nào?")
i = 0
Đối với từng ô được lựa chọn
Vị trí = InStr (1, UCase (Cell.Value), UCase (Ký tự))
Trong khi vị trí 0
i = i + 1
Vị trí = InStr (Vị trí + Len (Ký tự), Ô. Giá trị, Ký tự)
Wend
Ô tiếp theo
a = MsgBox ("Chuỗi" & ký tự & "đã trở thành" _
& i & "Số lần tìm thấy.", vbOKOnly, "Kết quả tìm kiếm")
Kết thúc Sub
Trong bước đầu tiên, macro hỏi trong cửa sổ ký tự nào bạn muốn tìm kiếm trong vùng được đánh dấu:
Sau đó, phạm vi ô được tìm kiếm. Cửa sổ kết quả cho bạn biết tần suất tìm thấy ký tự bạn đang tìm kiếm:
Tìm kiếm không phân biệt chữ hoa chữ thường. Bạn cũng có thể tìm kiếm các chuỗi dài hơn một chữ cái hoặc số. Ngoài các chữ cái, bạn cũng có thể tìm kiếm các số hoặc sự kết hợp của các chữ cái và số.
Mẹo: Nếu bạn muốn biết cách nhập và bắt đầu macro trong Excel, bạn sẽ tìm thấy mô tả ngắn gọn tại đây: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
