Hướng dẫn này sẽ trình bày cách sử dụng các phương pháp Tìm và Thay thế trong Excel VBA.
VBA Tìm
Excel có tích hợp tuyệt vời Tìm thấy và Tìm thay thế công cụ.
Chúng có thể được kích hoạt bằng các phím tắt CTRL + F (Tìm) hoặc CTRL + H (Thay thế) hoặc thông qua Ruy-băng: Trang chủ> Chỉnh sửa> Tìm & Chọn.
Bằng cách nhấp chuột Tùy chọn, bạn có thể thấy các tùy chọn tìm kiếm nâng cao:
Bạn có thể dễ dàng truy cập cả hai phương pháp Tìm và Thay thế bằng VBA. Các phương thức tích hợp này nhanh hơn nhiều so với bất kỳ phương thức nào mà bạn có thể tự viết trong VBA.
Tìm ví dụ VBA
Để chứng minh chức năng Tìm, chúng tôi đã tạo tập dữ liệu sau trong Sheet1.
Nếu bạn muốn làm theo, hãy nhập dữ liệu vào sổ làm việc của riêng bạn.
<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>
VBA Tìm không có tham số tùy chọn
Khi sử dụng phương pháp VBA Find, có nhiều tham số tùy chọn mà bạn có thể đặt.
Chúng tôi thực sự khuyên bạn nên xác định tất cả các tham số bất cứ khi nào sử dụng Phương pháp Tìm!
Nếu bạn không xác định các tham số tùy chọn, VBA sẽ sử dụng các tham số hiện được chọn trong cửa sổ Tìm của Excel. Điều này có nghĩa là bạn có thể không biết những thông số tìm kiếm nào đang được sử dụng khi mã được chạy. Tìm có thể được chạy trên toàn bộ sổ làm việc hoặc một trang tính. Nó có thể tìm kiếm các công thức hoặc giá trị. Không có cách nào để biết, trừ khi bạn kiểm tra thủ công những gì hiện được chọn trong Cửa sổ Tìm kiếm của Excel.
Để đơn giản, chúng ta sẽ bắt đầu với một ví dụ không có tham số tùy chọn nào được xác định.
Ví dụ tìm kiếm đơn giản
Hãy xem một ví dụ Tìm đơn giản:
| 123456789 | Sub TestFind ()Dim MyRange As RangeĐặt MyRange = Sheets ("Sheet1"). UsedRange.Find ("nhân viên")MsgBox MyRange.AddressMsgBox MyRange.ColumnMsgBox MyRange.RowKết thúc Sub |
Mã này tìm kiếm “nhân viên” trong Phạm vi đã sử dụng của Trang tính 1. Nếu nó tìm thấy "nhân viên", nó sẽ gán phạm vi tìm thấy đầu tiên cho phạm vi biến MyRange.
Tiếp theo, các hộp thông báo sẽ hiển thị với địa chỉ, cột và hàng của văn bản được tìm thấy.
Trong ví dụ này, cài đặt Tìm mặc định được sử dụng (giả sử chúng chưa được thay đổi trong Cửa sổ Tìm kiếm của Excel):
- Văn bản tìm kiếm được đối sánh một phần với giá trị ô (không yêu cầu đối sánh ô chính xác)
- Tìm kiếm không phân biệt chữ hoa chữ thường.
- Chỉ tìm các tìm kiếm trên một trang tính duy nhất
Các cài đặt này có thể được thay đổi với các thông số tùy chọn khác nhau (thảo luận bên dưới).
Tìm ghi chú phương pháp
- Tìm không chọn ô nơi văn bản được tìm thấy. Nó chỉ xác định phạm vi được tìm thấy mà bạn có thể thao tác trong mã của mình.
- Phương thức Tìm sẽ chỉ định vị phiên bản đầu tiên được tìm thấy.
- Bạn có thể sử dụng các ký tự đại diện (*), ví dụ: tìm kiếm ‘E *’
Không kết quả
Nếu văn bản tìm kiếm không tồn tại, thì đối tượng phạm vi sẽ vẫn trống. Điều này gây ra sự cố lớn khi mã của bạn cố gắng hiển thị các giá trị vị trí vì chúng không tồn tại. Điều này sẽ dẫn đến một thông báo lỗi mà bạn không muốn.
May mắn thay, bạn có thể kiểm tra một đối tượng phạm vi trống trong VBA bằng cách sử dụng Is Operator:
| 1 | Nếu không phải MyRange thì không có gì cả |
Thêm mã vào ví dụ trước của chúng tôi:
| 12345678910111213 | Sub TestFind ()Dim MyRange As RangeĐặt MyRange = Sheets ("Sheet1"). UsedRange.Find ("nhân viên")Nếu không phải MyRange thì không có gì cảMsgBox MyRange.AddressMsgBox MyRange.ColumnMsgBox MyRange.RowKhácMsgBox "Không tìm thấy"Kết thúc nếuKết thúc Sub |
Tìm tham số
Cho đến nay, chúng ta mới chỉ xem xét một ví dụ cơ bản về việc sử dụng phương pháp Find. Tuy nhiên, có một số thông số tùy chọn có sẵn để giúp bạn tinh chỉnh tìm kiếm của mình
| Tham số | Kiểu | Sự miêu tả | Giá trị |
| Gì | Yêu cầu | Giá trị cần tìm kiếm | Bất kỳ kiểu dữ liệu nào như chuỗi hoặc số |
| Sau | Không bắt buộc | Tham chiếu ô đơn để bắt đầu tìm kiếm của bạn | Địa chỉ ô |
| Nhìn vào | Không bắt buộc | Sử dụng Công thức, Giá trị, Nhận xét để tìm kiếm | xlValues, xlFormulas, xlComments |
| Nhìn vào | Không bắt buộc | Khớp một phần hoặc toàn bộ ô | xlWhole, xlPart |
| Tìm kiếm | Không bắt buộc | Thứ tự tìm kiếm trong - hàng hoặc cột | xlByRows, xlByColummns |
| Tìm kiếm | Không bắt buộc | Hướng tìm kiếm đi vào - tiến hoặc lùi | xlNext, xlPre Before |
| MatchCase | Không bắt buộc | Tìm kiếm có phân biệt chữ hoa chữ thường hay không | Đúng hay sai |
| MatchByte | Không bắt buộc | Chỉ được sử dụng nếu bạn đã cài đặt hỗ trợ ngôn ngữ byte kép, ví dụ: tiếng Trung Quốc | Đúng hay sai |
| SearchFormat | Không bắt buộc | Cho phép tìm kiếm theo định dạng của ô | Đúng hay sai |
Sau tham số và tìm nhiều giá trị
Bạn sử dụng Sau tham số để chỉ định ô bắt đầu cho tìm kiếm của bạn. Điều này rất hữu ích khi có nhiều trường hợp của giá trị mà bạn đang tìm kiếm.
Nếu một tìm kiếm đã tìm thấy một giá trị và bạn biết rằng sẽ có nhiều giá trị hơn được tìm thấy, thì bạn sử dụng phương thức Find với tham số ‘After’ để ghi lại trường hợp đầu tiên và sau đó sử dụng ô đó làm điểm bắt đầu cho lần tìm kiếm tiếp theo.
Bạn có thể sử dụng điều này để tìm nhiều trường hợp văn bản tìm kiếm của mình:
| 123456789101112131415161718192021222324252627282930313233343536 | Sub TestMultipleFinds ()Dim MyRange As Range, OldRange As Range, FindStr As String'Hãy tìm ví dụ đầu tiên của "‘ Light & Heat "Đặt MyRange = Sheets ("Sheet1"). UsedRange.Find ("Light & Heat")'Nếu không tìm thấy thì hãy thoátNếu MyRange Không Có Gì Thì Thoát Sub'Hiển thị địa chỉ đầu tiên được tìm thấyMsgBox MyRange.Address'Tạo một bản sao của đối tượng phạm viĐặt OldRange = MyRange'Thêm địa chỉ vào chuỗi phân cách bằng dấu "|" tính cáchFindStr = FindStr & "|" & MyRange.Address'Lặp lại trong phạm vi để tìm kiếm các trường hợp khácLàm'Tìm kiếm "Light & Heat" bằng cách sử dụng địa chỉ được tìm thấy trước đó làm thông số AfterĐặt MyRange = Sheets ("Sheet1"). UsedRange.Find ("Light & Heat", After: = Range (OldRange.Address))'Nếu địa chỉ đã được tìm thấy thì hãy thoát khỏi vòng lặp do - điều này dừng lặp lại liên tụcNếu InStr (FindStr, MyRange.Address) thì Thoát Do'Hiển thị địa chỉ tìm thấy mới nhấtMsgBox MyRange.Address'Thêm địa chỉ mới nhất vào chuỗi địa chỉFindStr = FindStr & "|" & MyRange.Address'tạo một bản sao của phạm vi hiện tạiĐặt OldRange = MyRangeVòngKết thúc Sub |
Mã này sẽ lặp lại qua phạm vi đã sử dụng và sẽ hiển thị địa chỉ mỗi khi nó tìm thấy một phiên bản của 'Light & Heat'
Lưu ý rằng mã sẽ tiếp tục lặp lại cho đến khi tìm thấy địa chỉ trùng lặp trong FindStr, trong trường hợp đó, nó sẽ thoát khỏi vòng lặp Do.
Tham số LookIn
Bạn có thể dùng Tham số LookIn để chỉ định thành phần của ô mà bạn muốn tìm kiếm. Bạn có thể chỉ định giá trị, công thức hoặc nhận xét trong ô.
- xlValues - Tìm kiếm giá trị ô (giá trị cuối cùng của ô sau khi tính toán)
- xlFormulas - Tìm kiếm trong chính công thức ô (bất cứ thứ gì được nhập vào ô)
- xlComments - Tìm kiếm trong ghi chú ô
- xlCommentsThreaded - Tìm kiếm trong nhận xét ô
Giả sử rằng một công thức đã được nhập trên trang tính, bạn có thể sử dụng mã ví dụ này để tìm vị trí đầu tiên của bất kỳ công thức nào:
| 12345678910 | Sub TestLookIn ()Dim MyRange As RangeĐặt MyRange = Sheets ("Sheet1"). UsedRange.Find ("=", LookIn: = xlFormulas)Nếu không phải MyRange thì không có gì cảMsgBox MyRange.AddressKhácMsgBox "Không tìm thấy"Kết thúc nếuKết thúc Sub |
Nếu tham số ‘LookIn’ được đặt thành xlValues, mã sẽ hiển thị thông báo ‘Không tìm thấy’. Trong ví dụ này, nó sẽ trả về B10.
Sử dụng Tham số LookAt
Các Tham số LookAt xác định xem tìm kiếm sẽ tìm kiếm kết hợp ô chính xác hay tìm kiếm bất kỳ ô nào có chứa giá trị tìm kiếm.
- xlWhole - Yêu cầu toàn bộ ô phải khớp với giá trị tìm kiếm
- xlPart - Tìm kiếm trong một ô cho chuỗi tìm kiếm
Ví dụ mã này sẽ xác định ô đầu tiên chứa văn bản “light”. Với Lookat: = xlPart, nó sẽ trả về một trận đấu cho “Light & Heat”.
| 123456789 | Sub TestLookAt ()Dim MyRange As RangeĐặt MyRange = Sheets ("Sheet1"). UsedRange.Find ("light", Lookat: = xlPart)Nếu không phải MyRange thì không có gì cảMsgBox MyRange.AddressKhácMsgBox "Không tìm thấy"Kết thúc nếuKết thúc Sub |
Nếu như xlWhole đã được đặt, một kết quả phù hợp sẽ chỉ trả về nếu giá trị ô là "nhẹ".
Tham số Tìm kiếm
Các Tham số SearchOrder ra lệnh cho việc tìm kiếm sẽ được thực hiện như thế nào trong toàn bộ phạm vi.
- xlRows - Tìm kiếm được thực hiện theo từng hàng
- xlXolumns - Tìm kiếm được thực hiện theo từng cột
| 123456789 | Sub TestSearchOrder ()Dim MyRange As RangeĐặt MyRange = Sheets ("Sheet1"). UsedRange.Find ("nhân viên", SearchOrder: = xlColumns)Nếu không phải MyRange thì không có gì cảMsgBox MyRange.AddressKhácMsgBox "Không tìm thấy"Kết thúc nếuKết thúc Sub |
Điều này ảnh hưởng đến trận đấu nào sẽ được tìm thấy đầu tiên.
Sử dụng dữ liệu thử nghiệm đã nhập vào trang tính trước đó, khi thứ tự tìm kiếm là các cột, ô được định vị là A5. Khi tham số thứ tự tìm kiếm được thay đổi thành xlRows, ô được định vị là C4
Điều này quan trọng nếu bạn có các giá trị trùng lặp trong phạm vi tìm kiếm và bạn muốn tìm trường hợp đầu tiên dưới một tên cột cụ thể.
Tham số hướng tìm kiếm
Các Tham số SearchDirection ra lệnh tìm kiếm sẽ đi theo hướng nào - tiến hoặc lùi một cách hiệu quả.
- xlNext - Tìm kiếm giá trị phù hợp tiếp theo trong phạm vi
- xlTrước - Tìm kiếm giá trị khớp trước đó trong phạm vi
Một lần nữa, nếu có các giá trị trùng lặp trong phạm vi tìm kiếm, nó có thể ảnh hưởng đến giá trị nào được tìm thấy trước.
| 12345678910 | Sub TestSearchDirection ()Dim MyRange As RangeĐặt MyRange = Sheets ("Sheet1"). UsedRange.Find ("heat", SearchDirection: = xlPrevious)Nếu không phải MyRange thì không có gì cảMsgBox MyRange.AddressKhácMsgBox "Không tìm thấy"Kết thúc nếuKết thúc Sub |
Sử dụng mã này trên dữ liệu thử nghiệm, hướng tìm kiếm của xlPrevious sẽ trả về vị trí của C9. Sử dụng tham số xlNext sẽ trả về vị trí A4.
Tham số Tiếp theo có nghĩa là tìm kiếm sẽ bắt đầu ở góc trên cùng bên trái của phạm vi tìm kiếm và hoạt động xuống dưới. Tham số Trước có nghĩa là tìm kiếm sẽ bắt đầu ở góc dưới cùng bên phải của phạm vi tìm kiếm và hoạt động trở lên.
Tham số MatchByte
Các Tham số MatchBye chỉ được sử dụng cho các ngôn ngữ sử dụng một byte kép để đại diện cho mỗi ký tự, chẳng hạn như tiếng Trung, tiếng Nga và tiếng Nhật.
Nếu tham số này được đặt thành ‘True’ thì Find sẽ chỉ khớp các ký tự byte kép với các ký tự byte kép. Nếu tham số được đặt thành ‘False’, thì ký tự byte kép sẽ khớp với ký tự byte đơn hoặc byte kép.
Tham số định dạng tìm kiếm
Các Tham số SearchFormat cho phép bạn tìm kiếm các định dạng ô phù hợp. Đây có thể là một phông chữ cụ thể đang được sử dụng, hoặc một phông chữ đậm, hoặc một màu văn bản. Trước khi sử dụng tham số này, bạn phải đặt định dạng cần thiết cho tìm kiếm bằng thuộc tính Application.FindFormat.
Đây là một ví dụ về cách sử dụng nó:
| 12345678910111213 | Sub TestSearchFormat ()Dim MyRange As RangeApplication.FindFormat.ClearApplication.FindFormat.Font.Bold = TrueĐặt MyRange = Sheets ("Sheet1"). UsedRange.Find ("heat", Searchformat: = True)Nếu không phải MyRange thì không có gì cảMsgBox MyRange.AddressKhácMsgBox "Không tìm thấy"Kết thúc nếuApplication.FindFormat.ClearKết thúc Sub |
Trong ví dụ này, FindFormat thuộc tính được thiết lập để tìm kiếm một phông chữ đậm. Sau đó, câu lệnh Find sẽ tìm kiếm từ ‘heat’, đặt tham số SearchFormat thành True để nó chỉ trả về một phiên bản của văn bản đó nếu phông chữ được in đậm.
Trong dữ liệu trang tính mẫu được hiển thị trước đó, điều này sẽ trả về A9, là ô duy nhất chứa từ ‘heat’ ở phông chữ đậm.
Đảm bảo rằng thuộc tính FindFormat được xóa ở cuối mã. Nếu bạn không tìm kiếm tiếp theo của bạn sẽ vẫn tính đến điều này và trả về kết quả không chính xác.
Khi bạn sử dụng tham số SearchFormat, bạn cũng có thể sử dụng ký tự đại diện (*) làm giá trị tìm kiếm. Trong trường hợp này, nó sẽ tìm kiếm bất kỳ giá trị nào có phông chữ đậm:
| 1 | Đặt MyRange = Sheets ("Sheet1"). UsedRange.Find ("*", Searchformat: = True) |
Sử dụng nhiều tham số
Tất cả các tham số tìm kiếm được thảo luận ở đây có thể được sử dụng kết hợp với nhau nếu được yêu cầu.
Ví dụ: bạn có thể kết hợp tham số ‘LookIn’ với tham số ‘MatchCase’ để bạn xem toàn bộ văn bản ô nhưng phân biệt chữ hoa chữ thường
| 123456789 | Sub TestMultipleParameters ()Dim MyRange As RangeĐặt MyRange = Sheets ("Sheet1"). UsedRange.Find ("Light & Heat", LookAt: = xlWhole, MatchCase: = True)Nếu không phải MyRange thì không có gì cảMsgBox MyRange.AddressKhácMsgBox "Không tìm thấy"Kết thúc nếuKết thúc Sub |
Trong ví dụ này, mã sẽ trả về A4, nhưng nếu chúng ta chỉ sử dụng một phần của văn bản, ví dụ: "Heat", sẽ không có gì được tìm thấy vì chúng tôi đang khớp trên toàn bộ giá trị của ô. Ngoài ra, nó sẽ không thành công do trường hợp không khớp.
| 1 | Đặt MyRange = Sheets ("Sheet1"). UsedRange.Find ("heat", LookAt: = xlWhole, MatchCase: = True) |
Thay thế trong Excel VBA
Như bạn có thể mong đợi, có một hàm Replace trong Excel VBA, hoạt động theo cách rất giống với 'Find' nhưng thay thế các giá trị tại vị trí ô được tìm thấy bằng một giá trị mới.
Đây là các tham số mà bạn có thể sử dụng trong một câu lệnh phương thức Replace. Chúng hoạt động theo cách giống hệt như đối với câu lệnh Find method. Sự khác biệt duy nhất đối với ‘Tìm’ là bạn cần chỉ định một tham số Thay thế.
| Tên | Kiểu | Sự miêu tả | Giá trị |
| Gì | Yêu cầu | Giá trị cần tìm kiếm | Bất kỳ kiểu dữ liệu nào như chuỗi hoặc số |
| Sự thay thế | Yêu cầu | Chuỗi thay thế. | Bất kỳ kiểu dữ liệu nào như chuỗi hoặc số |
| Nhìn vào | Không bắt buộc | Khớp một phần hoặc toàn bộ ô | xlPart hoặc xlWhole |
| Tìm kiếm | Không bắt buộc | Thứ tự tìm kiếm - Hàng hoặc Cột | xlByRows hoặc xlByColumns |
| MatchCase | Không bắt buộc | Tìm kiếm có phân biệt chữ hoa chữ thường hay không | Đúng hay sai |
| MatchByte | Không bắt buộc | Chỉ được sử dụng nếu bạn đã cài đặt hỗ trợ ngôn ngữ byte kép | Đúng hay sai |
| SearchFormat | Không bắt buộc | Cho phép tìm kiếm theo định dạng của ô | Đúng hay sai |
| ReplaceFormat | Không bắt buộc | Định dạng thay thế cho phương thức. | Đúng hay sai |
Tham số Định dạng Thay thế tìm kiếm một ô có định dạng cụ thể, ví dụ: in đậm giống như cách tham số SearchFormat hoạt động trong phương thức Tìm. Trước tiên, bạn cần đặt thuộc tính Application.FindFormat, như được hiển thị trong mã ví dụ Tìm được hiển thị trước đó
Thay thế mà không có tham số tùy chọn
Đơn giản nhất, bạn chỉ cần xác định những gì bạn đang tìm kiếm và những gì bạn muốn thay thế nó.
| 123 | Sub TestReplace ()Trang tính ("Trang 1"). Đã sử dụngRange.Replace What: = "Light & Heat", Replacement: = "L & H"Kết thúc Sub |
Lưu ý rằng phương thức Find sẽ chỉ trả về trường hợp đầu tiên của giá trị đã so khớp, trong khi phương thức Replace hoạt động trên toàn bộ phạm vi được chỉ định và thay thế mọi thứ mà nó tìm thấy so khớp.
Mã thay thế được hiển thị ở đây sẽ thay thế mọi phiên bản của ‘Light & Heat’ bằng ‘L & H’ thông qua toàn bộ phạm vi ô được xác định bởi đối tượng usedRange
Sử dụng VBA để tìm hoặc thay thế văn bản trong chuỗi văn bản VBA
Các ví dụ trên hoạt động tốt khi sử dụng VBA để tương tác với dữ liệu Excel. Tuy nhiên, để tương tác với chuỗi VBA, bạn có thể sử dụng các Hàm VBA tích hợp sẵn như INSTR và REPLACE.
Bạn có thể dùng Hàm INSTR để định vị một chuỗi văn bản trong một chuỗi dài hơn.
| 123 | Sub TestInstr ()MsgBox InStr ("Đây là chuỗi MyText", "MyText")Kết thúc Sub |
Mã ví dụ này sẽ trả về giá trị 9, là vị trí số nơi tìm thấy ‘MyText’ trong chuỗi cần tìm kiếm.
Lưu ý rằng nó có phân biệt chữ hoa và chữ thường. Nếu ‘MyText’ tất cả đều là chữ thường, thì giá trị 0 sẽ được trả về, có nghĩa là không tìm thấy chuỗi tìm kiếm. Dưới đây chúng tôi sẽ thảo luận về cách tắt phân biệt chữ hoa chữ thường.
INSTR - Bắt đầu
Có hai tham số tùy chọn khác có sẵn. Bạn có thể chỉ định điểm bắt đầu tìm kiếm:
| 1 | MsgBox InStr (9, "Đây là chuỗi MyText", "MyText") |
Điểm bắt đầu được chỉ định là 9 vì vậy nó vẫn sẽ trả về 9. Nếu điểm bắt đầu là 10, thì nó sẽ trả về 0 (không khớp) vì điểm bắt đầu sẽ quá xa về phía trước.
INSTR - Phân biệt chữ hoa chữ thường
Bạn cũng có thể đặt tham số So sánh thành vbBinaryCompare hoặc vbTextCompare. Nếu bạn đặt tham số này, câu lệnh phải có giá trị tham số bắt đầu.
- vbBinaryCompare - Phân biệt chữ hoa chữ thường (Mặc định)
- vbTextCompare - Không phân biệt chữ hoa chữ thường
| 1 | MsgBox InStr (1, "Đây là chuỗi MyText", "mytext", vbTextCompare) |
Câu lệnh này sẽ vẫn trả về 9, mặc dù văn bản tìm kiếm ở dạng chữ thường.
Để tắt phân biệt chữ hoa chữ thường, bạn cũng có thể khai báo Văn bản So sánh Tùy chọn ở đầu mô-đun mã của mình.
Chức năng thay thế VBA
Nếu bạn muốn thay thế các ký tự trong một chuỗi bằng văn bản khác trong mã của mình, thì phương pháp Thay thế là lý tưởng cho việc này:
| 123 | Sub TestReplace ()MsgBox Replace ("Đây là chuỗi MyText", "MyText", "Văn bản của tôi")Kết thúc Sub |
Mã này thay thế ‘MyText’ bằng ‘Văn bản của tôi’. Lưu ý rằng chuỗi tìm kiếm phân biệt chữ hoa chữ thường vì so sánh nhị phân là mặc định.
Bạn cũng có thể thêm các thông số tùy chọn khác:
- Bắt đầu - xác định vị trí trong chuỗi ban đầu mà thay thế phải bắt đầu từ đó. Không giống như trong phương thức Find, nó trả về một chuỗi bị cắt ngắn bắt đầu từ số ký tự được xác định bởi tham số Start.
- Đếm - xác định số lượng thay thế sẽ được thực hiện. Theo mặc định, Replace sẽ thay đổi mọi trường hợp của văn bản tìm kiếm được tìm thấy, nhưng bạn có thể giới hạn điều này ở một thay thế duy nhất bằng cách đặt tham số Count thành 1
- Đối chiếu - như trong phương pháp Tìm, bạn có thể chỉ định tìm kiếm nhị phân hoặc tìm kiếm văn bản bằng cách sử dụng vbBinaryCompare hoặc vbTextCompare. Nhị phân phân biệt chữ hoa chữ thường và văn bản không phân biệt chữ hoa chữ thường
| 1 | MsgBox Replace ("Đây là chuỗi MyText (mytext)", "MyText", "Văn bản của tôi", 9, 1, vbTextCompare) |
Mã này trả về ‘Chuỗi văn bản của tôi (mytext)’. Điều này là do điểm bắt đầu đã cho là 9, vì vậy chuỗi trả về mới bắt đầu từ ký tự 9. Chỉ có ‘MyText’ đầu tiên bị thay đổi vì tham số Count được đặt thành 1.
Phương pháp Replace lý tưởng để giải quyết các vấn đề như tên của các dân tộc có chứa dấu nháy đơn, ví dụ: O’Flynn. Nếu bạn đang sử dụng dấu nháy đơn để xác định giá trị chuỗi và có dấu nháy đơn, điều này sẽ gây ra lỗi vì mã sẽ diễn giải dấu nháy đơn là phần cuối của chuỗi và sẽ không nhận ra phần còn lại của chuỗi.
Bạn có thể sử dụng phương pháp Replace để thay thế dấu nháy đơn bằng không, loại bỏ nó hoàn toàn.
