18 VBA Advanced (Array)
18 VBA Advanced - Arrays (Creating, Amending), Multidimensional
Follow-up of VBA Beyond Basics and VBA for EveryOne Series
Topics in this Video:
Arrays Creating, Editing
Items and Elements
Multidimensional
My Blog: https://letsxcel.blogspot.com/
Code:
Sub vDaArray()
Dim vMyArray
'Elements
vMyArray = Array(1, 2, 3, 4, 5)
For vMyLoop = 1 To 5
MsgBox (vMyArray(vMyLoop))
Next vMyLoop
End Sub
Sub vDaArrayAdd()
Dim vMyArray
'Elements
vMyArray = Array(1, 2, 3, 4, 5)
ReDim vMyArray(6)
vMyArray(5) = "Hello World"
For vMyLoop = 0 To 5
MsgBox (vMyArray(vMyLoop))
Next vMyLoop
End Sub
Sub vDaArrayDelete()
Dim vMyArray
'Elements
vMyArray = Array(1, 2, 3, 4, 5)
vMyArray(3) = ""
For vMyLoop = 0 To 4
MsgBox (vMyArray(vMyLoop))
Next vMyLoop
End Sub
Sub vDaArrayCounter()
Dim vMyArray
'Elements
vMyArray = Array(1, 2, 3, 4, 5)
MsgBox (UBound(vMyArray))
MsgBox (LBound(vMyArray))
End Sub
Sub vDaArrayReadRange()
Dim vMyArray
'Elements
vMyArray = Range("A1:A3").Value
'Range("B1:B3").Value = vMyArray
For vMyLoop = 1 To 3
MsgBox (vMyArray(vMyLoop, 1))
Next vMyLoop
End Sub
Sub vDaArrayWriteRange()
Dim vMyArray
'Elements
vMyArray = Range("A1:A3").Value
Range("B1:B3").Value = vMyArray
Range("D1").Value = vMyArray(2, 1)
End Sub
Что делает видео по-настоящему запоминающимся? Наверное, та самая атмосфера, которая заставляет забыть о времени. Когда вы заходите на RUVIDEO, чтобы посмотреть онлайн «18 VBA Advanced (Array)», вы рассчитываете на нечто большее, чем просто загрузку плеера. И мы это понимаем. Контент такого уровня заслуживает того, чтобы его смотрели в HD 1080, без дрожания картинки и бесконечного буферизации.
Честно говоря, Rutube сегодня — это кладезь уникальных находок, которые часто теряются в общем шуме. Мы же вытаскиваем на поверхность самое интересное. Будь то динамичный экшн, глубокий разбор темы от любимого автора или просто уютное видео для настроения — всё это доступно здесь бесплатно и без лишних формальностей. Никаких «заполните анкету, чтобы продолжить». Только вы, ваш экран и качественный поток.
Если вас зацепило это видео, не забудьте взглянуть на похожие материалы в блоке справа. Мы откалибровали наши алгоритмы так, чтобы они подбирали контент не просто «по тегам», а по настроению и смыслу. Ведь в конечном итоге, онлайн-кинотеатр — это не склад файлов, а место, где каждый вечер можно найти свою историю. Приятного вам отдыха на RUVIDEO!
Видео взято из открытых источников Rutube. Если вы правообладатель, обратитесь к первоисточнику.