Ниже мы рассмотрим программу на Excel VBA тот разделяет строки.
Ситуация:
Поместите командную кнопку на свой рабочий лист и добавьте следующие строки кода:
1. Сначала мы объявляем переменную с именем fullname типа String, переменную с именем commaposition типа Integer и переменную с именем i типа Integer.
Уменьшить полное имя как строку, запятую как целое число, я как целое число
Проблема, с которой мы имеем дело, заключается в том, что нам нужно указать Excel VBA, где мы хотим разделить строку. В случае Смита, Майка запятая находится на позиции 6, а в случае Уильямса, Джанет запятая находится на позиции 9.
2. Мы используем цикл для выполнения операций с каждым именем, введенным в Excel. Сначала мы инициализируем полное имя переменной. Затем мы используем функцию Instr, чтобы найти позицию запятой.
Для i = от 2 до 7
fullname = Ячейки (i, 1). Значение
commaposition = InStr (полное имя, ",")
3. Наконец, мы хотим записать часть после запятой в столбец B и часть перед запятой в столбец C. Вы можете добиться этого, добавив строки:
Ячейки (i, 2). Значение = Mid (полное имя, запятая + 2)
Ячейки (i, 3) .Value = Left (полное имя, запятая - 1)
Середина (полное имя, запятая + 2) означает, что мы хотим, чтобы часть полного имени начиналась с символа «запятая + 2» (это в точности первое имя).
Слева (полное имя, запятая - 1) означает, что мы хотим, чтобы часть полного имени начиналась с начала до символа «запятая - 1» (это точно фамилия).
4. Не забудьте замкнуть петлю.
Далее я
5. Добавьте шесть имен, разделенных запятой и пробелом, в диапазон («A2: A7»).
6. Протестируйте программу.
Результат:
