Екцел ВБА: Описан је поступак петље.

Екцел ВБА Лоопс

Петље су један од најосновнијих и најснажнијих програмских алата у ВБА и користе се на већини програмских језика. Циклуси се користе за понављање блок кода онолико пута колико је потребно, док одређени увјет не остане истинит или се не постигне одређена точка (или вриједност), након чега се извршава сљедећи дио кода. Петља вам омогућава да напишете неколико једноставних линија кода и постигнете далеко значајнији излаз, само понављањем.
  • Фор Лооп
    • Фор ... Нект Статементс
    • Фор Еацх ... Нект Статементс
  • До вхиле Лооп
    • До вхиле ... Лооп Изјаве
    • До ... Лооп Вхиле Изјаве
  • До До Лооп
    • До До ... Лооп Изјаве
    • До ... Лооп до Изјаве

Постоје три основне врсте ВБА Лоопс (подељене на 6 петљи):

Фор Лооп

Фор ... Нект Статементс

понавља блок кода одређени број пута.

следећи пример ће приказати МсгБок за 5 пута и приказати број.

 Суб Ф_Нект_лооп () Дим и Ас Интегер За и = 1 до 5 МсгБок и Нект и Енд Суб 

Фор Еацх ... Нект Статементс

Фор Еацх ... Нект Лооп понавља блок кода за сваки објект у групи. Он понавља извршавање блока кода за сваки елемент збирке. Петља се зауставља када су сви елементи у колекцији покривени, а извршење се помера на секцију кода одмах након наредног наредбе.

 Суб Ф_еацх_лооп () Дим Целл Ас Ранге За сваку ћелију у АцтивеСхеет.Ранге ("А1: А10") Целл.Интериор.Цолор = РГБ (160, 251, 142) 

 Изјава Излаз ће одмах зауставити извршавање постојеће петље и извршити секцију кода одмах након наредног наредбе, 

До вхиле Лооп

понавља блок кода неограничено док се наведени увјет наставља испуњавати и вреднује на Труе, и зауставља се када се увјет претвори у Фалсе. Услов се може тестирати или на почетку или на крају петље.

До вхиле ... Лооп Изјаве

тестирајте стање на почетку,

 Суб до_Вхиле () Дим и Ас Интегер и = 1 До Целлс (И, 1) .Валуе МсгБок ии = и + 1 Лооп МсгБок и Енд Суб 

До ... Лооп Вхиле Изјаве

тестирајте стање на крају петље

 Суб до_Вхиле () Дим и Ас Интегер и = 1 Да ли МсгБок ии = и + 1 Лооп док ћелије (и, 1) .Валуе "" МсгБок и Енд Суб 

 Изјава Екит До ће одмах зауставити извршење постојеће петље и извршити секцију кода одмах након наредног наредбе, 

До До Лооп

понавља блок кода неограничено док се не задовољи и процени на Труе. Услов се може тестирати или на почетку или на крају петље

До До ... Лооп Изјаве

тестирајте стање на почетку,

 Суб до_Унтил () Дим и Као Интегер и = 1 До До Нот ИсЕмпти (Ћелије (и, 1)) Ћелије (и, 1) .Интериор.Цолор = РГБ (255, 0, 0) и = и + 1 Лооп Енд Суб 

До ... Лооп до Изјаве

тестирајте стање на крају петље.

 Суб до_Унтил () Дим и Ас Интегер и = 1 Да ли ћелије (и, 1) .Интериор.Цолор = РГБ (255, 0, 0) и = и + 1 петља док се не испразни (ћелије (и, 1)) Крај суб 
Претходни Чланак Sledeći Чланак

Топ Савети