Претварање вектора једног реда у матрицу - примери кода ВБА

  • Корак 1Бесплатно преузмите интерактивни ВБА водич
  • Корак 2Наш додатак ВБА олакшава преузимање кодирања
  • Корак 3Погледајте наш Узорак кода ВБА
  • Хире УсСложени ВБА захтев? Ангажујте наше стручњаке.

Научите ВБА

Претворите вектор једног реда у матрицу

Ово је супротан водич туторијала Претвори матрицу у вектор.

Следећа функција узима вектор једног реда и претвара се у матрицу:

123456789101112131415161718 Функција Цреате_Матрик (Вецтор_Ранге Ас Ранге, Но_Оф_Цолс_ин_оутпут Ас Интегер, Но_оф_Ровс_ин_оутпут Ас Интегер) Ас ВариантРеДим Темп_Арраи (Но_Оф_Цолс_ин_оутпут, Но_оф_Ровс_ин_оутпут)Дим Но_Оф_Елементс_Ин_Вецтор Ас ИнтегерЗатамни Цол_Цоунт као цео број, Ров_Цоунт као цео бројДим ЦеллНо_Оф_Елементс_Ин_Вецтор = Вецтор_Ранге.Ровс.Цоунт'Уклоните НУЛЛ условеАко Вецтор_Ранге није ништа, изађите из функцијеАко је Но_Оф_Цолс_ин_оутпут = 0 Затим изађите из функцијеАко је Но_оф_Ровс_ин_оутпут = 0 Затим изађите из функцијеАко је Но_Оф_Елементс_Ин_Вецтор = 0, тада изађите из функцијеФор Цол_Цоунт = 1 За Но_Оф_Цолс_ин_оутпутЗа Ров_Цоунт = 1 до Но_оф_Ровс_ин_оутпутТемп_Арраи (Цол_Цоунт, Ров_Цоунт) = Вецтор_Ранге.Целлс ((((Но_оф_Ровс_ин_оутпут) * (Цол_Цоунт - 1) + Ров_Цоунт), 1)Следећи ред_бројСледећи Цол_ЦоунтЦреате_Матрик = Темп_АрраиЗавршна функција

Функција има 3 аргумента:
• Распон почетног вектора
• Број редова потребних у матрици
• Број колона потребних у матрици

Дакле, ако имамо:

Тада можемо позвати нашу функцију:

Претвори у_матрицу (ц7: ц16,2,5)

Где:

1. ц7: ц16 је опсег матрице
2. 2 је број редова потребних у матрици
3. 5 је број потребних колона

И добијамо:

Кликните овде да бисте преузели .КСЛСМ датотеку са ове функције.

Ви ће помоћи развој сајта, дељење страницу са пријатељима

wave wave wave wave wave