Извлечение данных из коллекции в VBA

Я пытаюсь получить данные, которые я сохранил в коллекции в VBA. Я не очень уверен, как получить данные. Это дает мне ошибку несоответствия типа.

Мой код выглядит так:

Set col = New Collection col.Add BGN_arr, "BGN" col.Add CBBT_arr, "CBBT" Dim curr_arr() As Variant Set curr_arr = col("BGN") 

Пробовал и это:

 Set curr_arr = col.Item ("BGN") 

Необходимо руководствоваться этим.

У вас есть 2 вопроса, которые я вижу:

  1. Вы установили curr_arr() As Variant – это не должен быть массив.
  2. Вы используете метод Set который вызовет проблему.

Этот код должен работать:

 Set col = New Collection col.Add BGN_arr, "BGN" col.Add CBBT_arr, "CBBT" Dim curr_arr As Variant curr_arr = col.Item ("BGN") 
Давайте будем гением компьютера.