Hàm Replace() Trong VBA - Học Lập Trình VBA Online - VietTuts

Trang chủ » Câu Lệnh Replace Trong Excel » Hàm Replace() Trong VBA - Học Lập Trình VBA Online - VietTuts

Có thể bạn quan tâm

Hàm Len() trong VBA Hàm Space() trong VBA

Hàm Replace() trong VBA thay thế một phần được chỉ định của chuỗi bằng một chuỗi cụ thể, với số lần được chỉ định.

Nội dung chính

  • Cú pháp:
  • Ví dụ sử dụng hàm Replace() trong VBA

Cú pháp:

Replace(string,find,replacewith[,start[,count[,compare]]])

Mô tả các tham số:

  • String: Tham số bắt buộc. Chuỗi đầu vào sẽ được tìm kiếm để thay thế.
  • Find: Tham số bắt buộc. Một phần của chuỗi sẽ được thay thế.
  • Replacewith: Tham số bắt buộc. Chuỗi thay thế, sẽ được thay thế so với tham số find.
  • Start: Tham số tùy chọn. Chỉ định vị trí bắt đầu từ nơi chuỗi phải được tìm kiếm và thay thế. Giá trị mặc định là 1.
  • Count: Tham số tùy chọn. Chỉ định số lần thay thế phải được thực hiện.

  • Compare: Tham số tùy chọn. Chỉ định phương pháp so sánh sẽ được sử dụng. Giá trị mặc định là 0.

    0 = vbBinaryCompare - Thực hiện so sánh nhị phân (mặc định). 1 = vbTextCompare - Thực hiện so sánh kiểu văn bản.

Ví dụ sử dụng hàm Replace() trong VBA

Sub vidu_ham_Replace() Dim var As Variant var = "This is VBScript Programming" 'VBScript duoc thay the boi MS VBScript Cells(1, 1) = ("Line 1: " & Replace(var, "VBScript", "MS VBScript")) 'VB duoc thay the boi vb Cells(2, 1) = ("Line 2: " & Replace(var, "VB", "vb")) ''is' duoc thay the boi ## Cells(3, 1) = ("Line 3: " & Replace(var, "is", "##")) ''is' duoc thay the boi ## bo qua cac ky tu truoc lan dau tien xay ra Cells(4, 1) = ("Line 4: " & Replace(var, "is", "##", 5)) ''s' duoc thay the boi ## cho 2 lan xuat hien tiep theo Cells(5, 1) = ("Line 5: " & Replace(var, "s", "##", 1, 2)) ''r' duoc thay the boi ## cho tat ca cac lan xuat hien so sanh van ban Cells(6, 1) = ("Line 6: " & Replace(var, "r", "##", 1, -1, 1)) ''t' duoc thay the boi ## cho tat ca cac lan xuat hien so sanh nhi phan Cells(7, 1) = ("Line 7: " & Replace(var, "t", "##", 1, -1, 0)) End Sub

Kết quả:

Line 1: This is MS VBScript Programming Line 2: This is vbScript Programming Line 3: Th## ## VBScript Programming Line 4: ## VBScript Programming Line 5: Thi## i## VBScript Programming Line 6: This is VBSc##ipt P##og##amming Line 7: This is VBScrip## Programming Hàm Len() trong VBA Hàm Space() trong VBA

Từ khóa » Câu Lệnh Replace Trong Excel