Thay chuỗi có cùng định dạng. (1 người xem)

Người dùng đang xem chủ đề này

quoctan3989

Thành viên mới
Tham gia
18/4/12
Bài viết
35
Được thích
5
Chào mọi người.
Mình đang có thắc mắc trong một đoạn text mình có nhiều thẻ có định dạng <text>.
Mình muốn thay đổi tất cả các text có dạng <text> thành khoảng trắng.
Ví dụ.
<abc>Giải pháp excel<wer> Giải pháp excel <rrtr>Giải pháp excel<rrtrr> Giải pháp excel <qwert>Giải pháp excel<tttr>

Mình đã dùng SUBSTITUTE để thay từng cái. Có cách nào làm nhanh hơn không phải thay từng cái không.
Thanks nhiều.
 
Bạn làm như sau:
Ctrl + H => Hộp thoại Find and Replace hiện ra
Tại Find gõ: <*>
Tại Replace gõ dấu cách
=> Replace all
 
Thanks bạn. Mình đang tìm cách giải quyết bằng hàm. Vì công việc mình phải dùng hàm. ^^
Vậy bạn dùng hàm tự tạo nhé, Copy code này ra 1 modul (Ctrl + F11 => Insert modul)
Mã:
Function Tach(Str As String)
With CreateObject("Vbscript.RegExp")
    .Global = True
    .Pattern = "<\w+>"
    Tach = .Replace(Str, " ")
End With
End Function
Bạn xem File để biết thêm cách sử dụng
 

File đính kèm

Vậy bạn dùng hàm tự tạo nhé, Copy code này ra 1 modul (Ctrl + F11 => Insert modul)
Mã:
Function Tach(Str As String)
With CreateObject("Vbscript.RegExp")
    .Global = True
    .Pattern = "<\w+>"
    Tach = .Replace(Str, " ")
End With
End Function
Bạn xem File để biết thêm cách sử dụng

Thanks bạn nhiều.
Không biết có còn cách nào chỉ dùm hàm thui không nhỉ. ^^
 
Thanks bạn nhiều.
Không biết có còn cách nào chỉ dùm hàm thui không nhỉ. ^^

Hàm thì e rằng... đuối
Nếu như:
- Biết trước các text trong cắp dấu <> là cái gì (cố định)
- Biết trước trong chuổi có bao nhiêu dấu < và bao nhiêu dấu > (cố định)
Với 1 trong 2 điều kiện như trên thì may ra còn làm được. Bạn cứ đưa file thật của bạn lên đây để mọi người nghiên cứu (nói không không thế ai biết đâu mà lần)
 
Đây là file ví dụ.
Số lượng < và > trong file thì không cố định được. Vì mỗi content có số lượng thẻ khác nhau.
 

File đính kèm

Bài viết mới nhất

Back
Top Bottom