Цей підручник покаже, як заповнити масив діапазоном клітинок.
Призначити діапазон масиву
Ми можемо легко заповнити масив Variant діапазоном клітинок.
Призначте значення з одного стовпця
У цьому прикладі цикл буде проходити по діапазону ("A1: A10"), призначаючи значення клітинки масиву:
| 12345678910111213 | Sub TestArrayValuesSingle ()'Оголосити масив як варіантний масивDim arRng () як варіант'Оголосіть ціле число для збереження кількості рядківЗатемнити iRw як ціле число'Призначити діапазон змінній масивуarRng = Діапазон ("A1: A10")'цикл через рядки - від 1 до 10Для iRw = 1 до UBound (arRng)'показати результат у безпосередньому вікніDebug.Print arRng (iRw, 1)Далі iRwEnd Sub |
The UBound використовується для встановлення верхньої межі масиву (наприклад, 10) так, щоб цикл знав цикл 10 разів.
TheНалагодження. Друк функція покаже вам значення, що міститься в масиві у безпосередньому вікні.
Призначте значення з кількох стовпців
| 123456789101112131415161718 | Sub TestArrayValuesMultiple ()'Оголосити масив як варіантний масивDim arRng () як варіант'Оголосіть ціле число для збереження кількості рядківЗатемнити iRw як ціле число'Оголосіть ціле число для збереження кількості стовпцівЗатемніть iCol як ціле число'Призначити діапазон змінній масивуarRng = Діапазон ("A1: C10")'цикл через рядки - від 1 до 10Для iRw = 1 до UBound (arRng, 1)'зараз - у першому рядку пройдіть по 3 стовпцяхДля iCol = 1 до UBound (arRng, 2)'показати результат у безпосередньому вікніDebug.Print arRng (iRw, iCol)Далі iColДалі iRwEnd Sub |
У наведеному вище коді ми заповнили масив значеннями в діапазоні ("A1: C10").
The UBound знову використовується - але цього разу це потрібно двічі - один раз, щоб прокрутити рядки, а потім знову, щоб прокрутити стовпці.
The Налагодження. Друк функція покаже вам значення, що міститься в масиві у безпосередньому вікні.
