Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
разделение текста - каждая буква в отдельной ячейке
 
#1
11.03.2016 00:14:00
Есть табличка из которой данные попадают с помощью ВПР  в специальный бланк, в котором каждая буква должна быть в отдельной ячейке.
Допустим, есть графа "фамилия". Каждая буква фамилии должна попасть в отдельную ячейку...
Кроме формулы
Код
=ПРОПИСН(ПСТР(ВПР("*";Лист1!$A$1:$AD$9;3);1;1))

на ум ничего не приходит...макросами, к сожалению, не владею
Но получается очень муторно вводить подобную формулу в каждую ячейку (т.е. для каждой буквы фамилии и т.д.),  меняя каждый раз "начальную позицию".
Можно как-то оптимизировать формулу, чтоб ее можно было протянуть по всей строке, без ежеячеечных изменений?
Может кто-то подскажет нормальный вариант решения моей задачи?  


Прошу сразу не закидывать помидорами, ибо совсем-совсем начинающая)))))
 
 
 
#2
11.03.2016 00:54:10
В модуль листа стр.1 макрос для фамилии, для остальной части по аналогии
Код
Sub Razdelenie()
Dim Fio As String
Dim j As Integer
Dim n As Integer
  Fio = Worksheets("Лист1").Range("C4")
     Range("S2:DN2") = ""     'очищаем строку под фамилию
    n = 0
  For j = 1 To Len(Fio)
    Cells(2, 19 + n) = Mid(Fio, j, 1)
    n = n + 3
  Next
End Sub
 
 
 
#3
11.03.2016 01:06:32
Цитата
Kuzmich написал:
В модуль листа стр.1 макрос для фамилии, для остальной части по аналогии
написать около 50 мини-кодов ничего в них не понимая... быстрее вручную данные забить получится  :(
 
 
 
#4
11.03.2016 06:01:45
Цитата
Карина Ефимова написал: муторно вводить... в каждую ячейку
У Вас - зачем-то не в каждую ячейку, а в каждую третью ячейку.
Можно вот так Вашу формулу подкорректировать:
=ПРОПИСН(ПСТР(ВПР("*";Лист1!$A$1:$W$9;3);ОКРУГЛВВЕРХ(СТОЛБЕЦ(A1)/3;0);1))
А если бы не было объединенных ячеек - тогда было бы покороче, вот так:
=ПРОПИСН(ПСТР(ВПР("*";Лист1!$A$1:$W$9;3);СТОЛБЕЦ(A1);1))
Всё сложное - не нужно. Всё нужное - просто /М. Т. Калашников/
 
 
 
#5
11.03.2016 06:24:42
Карина Ефимова, можете изучить данный пример и адаптировать реализацию под себя.

Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori
 
 
 
#6
11.03.2016 13:07:41
Сведения о документе по аналогии сами..
"..Сладку ягоду рвали вместе, горьку ягоду я одна."
 
 
 
#7
26.03.2020 10:00:35
Доброго времени суток,
Есть столбик с цифрами и буквы+цифры. Если только цифры, их надо просто скопировать в столбик, если в них буквы+цифры, то надо буквы в отдельный и цифры в отдельный столбик.
Заранее спасибо.
Изменено: авик - 26.03.2020 10:14:56
 
 
 
#8
26.03.2020 14:13:00
Создайте отдельную тему с названием, отражающим суть проблемы
 
 
 
Страницы: 1
Читают тему
Наверх