Mảng biến thể VBA

Hướng dẫn này sẽ trình bày cách tạo và làm việc với Mảng biến thể.

Loại biến thể mảng

Mảng là một kiểu biến. Cũng như các biến khác, mảng được khai báo bằng cách sử dụng Câu lệnh Dim cho một mảng mức mô-đun hoặc thủ tục hoặc câu lệnh Công khai cho một mảng mức toàn cục.

Mảng biến thể là một mảng được khai báo là có kiểu dữ liệu biến thể. Các kiểu dữ liệu biến thể có thể lưu trữ bất kỳ loại giá trị nào: văn bản, số, ngày, giờ hoặc đối tượng.

Ưu điểm của mảng biến thể

Mảng biến thể đặc biệt vì chúng dễ làm việc hơn các mảng điển hình.

  1. Chúng dễ khai báo hơn.
  2. Bạn không phải lo lắng về kiểu dữ liệu nào đang được nhập vào mảng (ví dụ: nếu ô chứa văn bản hoặc số).
  3. Bạn có thể điền mảng bằng hàm Array (nếu kích thước mảng không được xác định khi khai báo).
  4. Bạn không cần sử dụng câu lệnh REDIM để thay đổi kích thước / điền lại mảng (nếu kích thước mảng không được xác định khi khai báo).

Khai báo một mảng biến thể

Để khai báo một mảng biến thể, bạn có thể viết câu lệnh đơn giản này

1 Dim varNames ()

Đây được coi là một năng động mảng biến thể.

Lưu ý rằng bạn không cần chỉ định loại dữ liệu (nó được giả định là một biến thể) hoặc kích thước mảng.

Gán giá trị cho mảng biến thể

Mảng biến thể có thể chứa bất kỳ loại giá trị nào: văn bản, số, ngày, giờ hoặc đối tượng.

Để gán giá trị cho một mảng biến thể, bạn có thể sử dụng Hàm mảng:

12 'điền vào mảngvarNames () = Array ("Fred", "Wilma", "Barney", "Betty")

Phương pháp này có thể dễ dàng hơn với bạn so với sử dụng phương pháp tiêu chuẩn:

12345 'điền từng phần tửvarNames (0) = "Fred"varNames (1) = "Wilma"varNames (2) = "Barney"varNames (3) = "Betty"

Thay đổi kích thước mảng biến thể

Mảng biến thể động có thể thay đổi kích thước trong thời gian chạy. Bạn không cần phải sử dụng Redim hoặc Bảo tồn Redim câu lệnh cần thiết để thay đổi kích thước mảng tiêu chuẩn.

Ví dụ về mảng biến thể

Kết hợp tất cả những điều này lại với nhau, thủ tục này sẽ điền và tạo lại một mảng biến thể:

123456789101112 Sub TestArray ()'khai báo biếnDim varNames () As Variant'điền vào mảngvarNames () = Array ("Fred", "Wilma", "Barney", "Betty")'trả lại các giá trịTham gia MsgBox (varNames, ",")'tái tạo lại mảngvarNames () = Mảng (400, 500)'trả lại các giá trị mớiTham gia MsgBox (varNames, ",")Kết thúc Sub

Chúng tôi đã điền vào varNames mảng với 4 tên, và sau đó với 2 số. Các hộp thông báo sẽ xuất hiện như sau.

Bạn sẽ giúp sự phát triển của trang web, chia sẻ trang web với bạn bè

wave wave wave wave wave