Преглед садржаја
Овај водич ће показати како поделити низове у ћелије.
Поделите низ у ћелије
У ВБА -и можемо користити функцију Сплит за подјелу низа текста у низ.
Напомена: Написали смо читав мега-водич за употребу функције Сплит у ВБА. Топло вам препоручујемо да то проверите.
Затим можемо проћи кроз низ, исписујући подељени текст у Екцел ћелије:
| 12345678910111213141516171819 | Суб СплитБиСемицолонЕкампле ()'Дефинишите променљивеДим МиАрраи () Ас Стринг, МиСтринг Ас Стринг, И Ас Вариант, Н Ас Интегер„Узорак низа са граничницима у зарезуМиСтринг = "јохн@мицо.цом; јане@мицо.цом; билл@мицо.цом; јамес@мицо.цом"'Помоћу функције Сплит подијелите саставне дијелове низаМиАрраи = Сплит (МиСтринг, ";")'Очистите радни листАцтивеСхеет.УседРанге.Цлеар'понављајте низЗа Н = 0 до УБоунд (МиАрраи)'Ставите сваку адресу е -поште у прву колону радног листаОпсег ("А" & Н + 1). Вредност = МиАрраи (Н)Следећи Н.Енд Суб |
Алтернативно, можемо користити функцију транспоновања за излаз матрице на радни лист:
| 12345678910111213 | Суб ЦопиТоРанге ()'Креирајте променљивеДим МиАрраи () Ас Стринг, МиСтринг Ас Стринг'Узорак низа са граничницима размакаМиСтринг = "Један, два, три, четири, пет, шест"'Помоћу функције Сплит подијелите саставне дијелове низаМиАрраи = Сплит (МиСтринг, ",")'Копирајте низ у радни листОпсег ("А1: А" & УБоунд (МиАрраи) + 1) .Валуе = Радни лист Функција. Транспозиција (МиАрраи)Енд Суб |
