Чтобы получить размер массива в Excel VBA, вы можете использовать функции UBOUND и LBOUND.

Поместите командную кнопку на листе и добавьте строки следующего кода:

  1. Во-первых, мы должны объявить массив. Наш массив имеет два измерения.

Он состоит из 5 строк и 2 столбцов. Кроме объявить две переменные типа Integer.

Dim Films(1 To 5, 1 To 2) As String, x As Integer, y As Integer

Массив может выглядеть следующим образом.

Size of an Array in Excel VBA

  1. Далее, мы получаем размер массива. Добавьте следующие строки кода:

x = UBound(Films, 1) - LBound(Films, 1) + 1

y = UBound(Films, 2) - LBound(Films, 2) + 1

UBound (Films, 1) дает верхний предел первого размера, который 5.

LBound (Фильмы, 1) дает нижний предел первого измерения, которая является 1.

UBound (Films, 2) дает верхний предел второго аспекта, который является 2.

LBound (Фильмы, 2) дает нижний предел второго аспекта, который является 1.

В результате, х равен 5, и у равна 2.

  1. Мы используем MsgBox для отображения количества элементов массива.

MsgBox "This array consists of " & x * y & " elements"

Результат:

Size of an Array Result