Преглед садржаја
У ВБА можете да се крећете кроз низ ћелија, примењујући радње на сваку ћелију у опсегу.
Ако желите да тестирате услов за сваку ћелију у опсегу користећи ВБА, најбољи начин је да прођете кроз опсег, тестирајући сваку ћелију. Ево два примера кода који показују како да прођете кроз опсег. Вредност опсега можете заменити за било који опсег који вам је потребан за пролажење.
Петља кроз низ ћелија
Овај пример ће проћи кроз низ ћелија. Наредба иф тестира услов ако ћелија садржи текст „ФиндМе“ и приказује оквир за поруку са локацијом текста ако је пронађена.
| 1234567891011 | Публиц Суб ЛоопЦеллс ()Дим ц Ас РангеЗа сваки ц у опсегу ("А1: А10")Ако је ц.Валуе = "ФиндМе" ЗатимМсгБок "ФиндМе фоунд ат" & ц.АддрессКрај АкоСледеће цЕнд Суб |
Петља кроз целу колону
Овај пример се понавља кроз читав опсег колоне А.
| 1234567891011 | Публиц Суб ЛоопЦолумн ()Дим ц Ас РангеЗа сваки ц у опсегу ("А: А")Ако је ц.Валуе = "ФиндМе" ЗатимМсгБок "ФиндМе фоунд ат" & ц.АддрессКрај АкоСледеће цЕнд Суб |
Петља кроз цео ред
Следећи пример пролази кроз ред 1 узимајући у обзир читав ред као опсег.
| 1234567891011 | Јавни суб ЛоопРов ()Дим ц Ас РангеЗа сваки ц у опсегу ("1: 1")Ако је ц.Валуе = "ФиндМе" ЗатимМсгБок "ФиндМе фоунд ат" & ц.АддрессКрај АкоСледеће цЕнд Суб |
