Функция массива в Excel VBA можно быстро и легко инициализировать массив. Поместите командную кнопку на листе и добавьте строки следующего кода:

  1. Во-первых, создать переменную отделов типа Variant.

Dim departments As Variant
  1. С помощью массива функции присвоить массив переменных отделов. Добавьте следующую строку кода:

departments = Array("Sales", "Production", "Logistics")
  1. Для того, чтобы показать элемент с индексом 1, добавьте следующую строку кода:

MsgBox departments(1)

Результат:

Array Function Result

По умолчанию, индекс элемента массива начинается с 0.

  1. Добавить Option Base 1 в разделе Общие объявлений, если вы хотите, чтобы индекс начать с 1.

Add Option Base 1

Результат, когда вы снова нажмите кнопку команды.

Array Function Result with Option Base 1

Для практического примера функции массива см нашей примера программы ссылка: / VBA-примеры-месяц-имена [Месяц Имена].