Ghi chú. có một sự khác biệt tinh tế trong cú pháp nếu bạn muốn cho phép các khoảng trống lọc qua
Không có dấu cách. "[A-Z,a-z,0-9]"
Dấu cách OK. "[A-Z,a-z,0-9 ]"
Ý tôi là, vâng, được rồi, tôi đoán giá trị chr là một cách khác để thực hiện.
Tôi thích xem bộ lọc trong mã hơn và có thể dễ dàng hiểu nó đang làm gì mà không cần phải nhớ 32 = khoảng trống, v.v.
[SIZE="1"]Sub All_Macro[Điều khiển tùy chọn dưới dạng biến thể][/SIZE]
JimFuller1
Cao thủ
Điểm4,950Bài viết966
- Ngày 1 tháng 8 năm 2006
- #6
Lại. Xóa các ký tự không phải chữ và số khỏi chuỗi
tbmbob,
Mã của Aaron thực hiện thủ thuật. Nếu bạn muốn để khoảng trắng, tôi thấy rằng bạn có thể chỉnh sửa dòng này như thế này
Mã số
If b$ Like "[A-Z,a-z,0-9, ]" ThenĐó là dấu phẩy bổ sung và khoảng trắng sau 0-9
Jim
Tôi thấy Aaron cũng đã bảo hiểm, vì vậy tôi sẽ đi ngay bây giờ
JimFuller1
Cao thủ
Điểm4,950Bài viết966
- Ngày 1 tháng 8 năm 2006
- #số 8
Lại. Xóa các ký tự không phải chữ và số khỏi chuỗi
=If[and[Username=JimFuller1,"Cũng thích Toán tử Like"=True],"Cảm ơn Aaron. ",""]
Tái bút - Nếu bạn muốn tất cả những ký tự gọn gàng bị loại bỏ, bạn có thể sử dụng
Mã số
If Not b$ Like "[A-Z,a-z,0-9, ]" ThenJim. p
Máu Aaron
Cao thủ
Điểm8,485Bài viết1,587
- Ngày 1 tháng 8 năm 2006
- #11
Lại. Xóa các ký tự không phải chữ và số khỏi chuỗi
Trích dẫn tbmbo
Những điều đó sẽ không thành vấn đề đối với tôi, nhưng vì tò mò, việc sử dụng "Văn bản so sánh tùy chọn" ở đầu mô-đun có xử lý các ký tự đặc biệt này không?
Ừ. Tôi nhận thấy phần viết về điều đó trong tệp trợ giúp THÍCH. Tôi cho là vậy, nhưng tôi không biết liệu nó có tiếp thu mọi thứ hay không [hoặc có thể có, nhưng đối với một ngôn ngữ nhất định, bạn cũng sẽ không muốn nó] Tôi chưa kiểm tra nó
[SIZE="1"]Sub All_Macro[Điều khiển tùy chọn dưới dạng biến thể][/SIZE]
Jack ở Vương quốc Anh
Người điều hành siêu cấp
Phản ứng nhận được22Điểm24,912Bài viết4,762
- Ngày 1 tháng 8 năm 2006
- #13
Lại. Xóa các ký tự không phải chữ và số khỏi chuỗi
Một chức năng có thể, có thể được sử dụng trong VBA để dọn dẹp và báo cáo lại thông qua quy trình ban đầu của Bạn, vui lòng chỉnh sửa theo nhu cầu của Bạn
jiuk
[VBA]
Dim i dưới dạng số nguyên
Const myNotAllowed_DeleteThem = "abcdefghijklmnopqrstuvwxyz"
Hàm công khai myCleanString[strString As String]
' được viết bởi. Jack ở Vương quốc Anh - http. //www. vượt trội. com
' cho http. //www. OzGrid. com
' 01 tháng 8 năm 2006
For i = 1 To Len[myNotAllowed_DeleteThem]
strString = Application. Bảng TínhChức Năng. Substitute[strString, _
Mid[myNotAllowed_DeleteThem, i, 1], ""]
Next i
theEnd.
' jiuk
myCleanString = strString
Thoát chức năng
Kết thúc chức năng
[/vba]
tửu
[Hình ảnh bị chặn. https. //www. ozgrid. com/forum/c…smilies/emojione/2757. png]
Quy tắc DIỄN ĐÀN ----->http. //www. ozgrid. com/diễn đàn/thông báo. php?f=8
Dave Hawley
phù thủy xứ Oz
Phản hồi nhận được4Điểm188,694Bài viết32,090
- Ngày 2 tháng 8 năm 2006
- #15
Lại. Xóa các ký tự không phải chữ và số khỏi chuỗi
Trích dẫn
Những điều đó sẽ không thành vấn đề đối với tôi, nhưng vì tò mò, việc sử dụng "Văn bản so sánh tùy chọn" ở đầu mô-đun có xử lý các ký tự đặc biệt này không?
Không, điều đó chỉ dừng phân biệt chữ hoa chữ thường. Mặc định là so sánh nhị phân
Để làm bạn bối rối hơn, hãy xem thêm
Trích xuất số từ chuỗi văn bản
[SIZE="2"][center]Hợp nhất hoặc chuyển đổi Excel. Bổ trợ giao dịch cho Excel. Chuyển đổi Excel thành các trang web. Chuyển đổi cơ sở dữ liệu bao gồm Excel. Bảng tính kinh doanh. Xây dựng mô hình giao dịch tự động trên Excel [/SIZE][/center]
tbmbob
Sinh viên
Điểm625Bài viết85
- Ngày 2 tháng 8 năm 2006
- #16
Lại. Xóa các ký tự không phải chữ và số khỏi chuỗi
Trích dẫn từ Dave Hawley
Không, điều đó chỉ dừng phân biệt chữ hoa chữ thường. Mặc định là so sánh nhị phân
Theo tệp trợ giúp VBA,
"Với Văn bản so sánh tùy chọn, [A–E] khớp với A, a, À, à, B, b, E, e. "
Các ký tự có dấu này có khác với các ký tự có dấu trong các ngôn ngữ khác nhau không?
Cũng cảm ơn vì liên kết
-Travis
Jack ở Vương quốc Anh
Người điều hành siêu cấp
Phản ứng nhận được22Điểm24,912Bài viết4,762
- Ngày 2 tháng 8 năm 2006
- #17
Lại. Xóa các ký tự không phải chữ và số khỏi chuỗi
tbmbob - mã của tôi cho phép Bạn xóa các ký tự mã cứng, điều gì có thể dễ bảo trì hơn?
tửu
tửu
[Hình ảnh bị chặn. https. //www. ozgrid. com/forum/c…smilies/emojione/2757. png]
Quy tắc DIỄN ĐÀN ----->http. //www. ozgrid. com/diễn đàn/thông báo. php?f=8
kwoychesko
Người bắt đầu
Điểm5Bài viết1
- ngày 2 tháng 5 năm 2012
- #19
Lại. Xóa các ký tự không phải chữ và số khỏi chuỗi
Trích dẫn từ Aaron Blood;281806
Ý tôi là, vâng, được rồi, tôi đoán giá trị chr là một cách khác để thực hiện.
Tôi thích xem bộ lọc trong mã hơn và có thể dễ dàng hiểu nó đang làm gì mà không cần phải nhớ 32 = khoảng trống, v.v.
Bạn sẽ sử dụng các giá trị chr như thế nào để tìm một ". " và dấu "," [ví dụ]. Tôi đã thử một số cách để đưa Chr[46] và Chr[44] vào đó nhưng không thể hiểu đúng cú pháp