Hướng dẫn này sẽ dạy bạn cách xóa Mảng trong VBA.
Xóa toàn bộ mảng
Để xóa toàn bộ mảng, bạn có thể sử dụng Xóa tuyên bố:
| 1 | Xóa arrExample |
Trong thực tế:
| 123456789101112131415 | Sub ClearArray ()'Tạo mảng tĩnhDim arrExample (1 đến 3) dưới dạng chuỗi'Xác định giá trị mảngarrExample (1) = "Shelly"arrExample (2) = "Steve"arrExample (3) = "Neema"'Xóa toàn bộ mảngXóa arrExample'Kiểm tra giá trị mảngMsgBox arrExample (1)Kết thúc Sub |
Thay đổi kích thước và xóa mảng
Nếu Mảng của bạn là mảng động (Mảng động là mảng có thể thay đổi kích thước, trái ngược với mảng tĩnh không thể thay đổi kích thước), bạn có thể sử dụng Lệnh ReDim để thay đổi kích thước mảng, xóa toàn bộ mảng giá trị.
| 12 | 'Xóa toàn bộ mảngReDim arrExample (1 đến 4) |
Ví dụ đầy đủ:
| 12345678910111213141516 | Sub ClearArray2 ()'Tạo mảng độngDim arrExample () As StringReDim arrExample (1 đến 3)'Xác định giá trị mảngarrExample (1) = "Shelly"arrExample (2) = "Steve"arrExample (3) = "Neema"'Xóa toàn bộ mảngReDim arrExample (1 đến 4)'Kiểm tra giá trị mảngMsgBox arrExample (1)Kết thúc Sub |
Xóa một phần của một mảng
Như đã đề cập ở trên, Lệnh ReDim sẽ thay đổi kích thước của một mảng, xóa tất cả các giá trị khỏi mảng. Thay vào đó bạn có thể sử dụng Bảo tồn ReDim để thay đổi kích thước mảng, bảo toàn mọi giá trị hiện có. Trong thực tế, điều này có thể được sử dụng để xóa nhanh một phần của mảng.
| 12 | 'Xóa Vị trí 3+ReDim Bảo tồn arrExample (1 đến 2) |
Ví dụ đầy đủ:
| 12345678910111213141516171819 | Sub ClearArray3 ()'Tạo mảng độngDim arrExample () As StringReDim arrExample (1 đến 3)'Xác định giá trị mảngarrExample (1) = "Shelly"arrExample (2) = "Steve"arrExample (3) = "Neema"'Xóa Vị trí 3+ReDim Bảo tồn arrExample (1 đến 2)'Thay đổi kích thước thành 3 vị tríReDim Bảo tồn arrExample (1 đến 3)'Kiểm tra giá trị mảngMsgBox arrExample (3)Kết thúc Sub |
Vòng lặp qua toàn bộ mảng - Đặt lại giá trị
Thay vì xóa các giá trị mảng bằng Erase hoặc ReDim, bạn có thể lặp lại toàn bộ mảng, đặt lại từng giá trị.
** liên kết đến vòng lặp **
