как сделать чтобы из столбца А буквы раскладывались по ячейкам

[adamant63]

как сделать чтобы из столбца А буквы раскладывались по ячейкам

[Serge_Bliznykov]

adamant63, выделить столбец А, перейти в главное меню, раздел "Данные",
выбрать там "Текст по столбцам", указать разделитель "Пробел",
указать назначение $B$1
нажать кнопку "Готово"

или я что-то не так понял?

[Aleksandr H.]

Sub ZdelatChtob()
    Dim i As Integer, cl, txt, r As Integer
    r = 2
    Do While Cells(r, 1) <> ""
        Set cl = Cells(r, 1)
        txt = Split(cl, " ")
        Cells(cl.Row, cl.Column + 1).Resize(1, UBound(txt) + 1) = txt
    r = r + 1
    Loop
    
End Sub

upd.
Serge_Bliznykov: верно, хотя с другой стороны, разве о текст по столбцах на форумах спрашивают?

[svsh2016]

добрый день,например столбец D

=

ПСТР($A2;СТОЛБЕЦ()+1;1)

столбец C
=

ПСТР($A2;СТОЛБЕЦ();1)

столбец B
=

ПСТР($A2;СТОЛБЕЦ()-1;1)

[adamant63]

нужно вставить число с помощью функции "наибольшее + смещение"
т.е. это будет строка 11 числа 10 11 12(как объеденить функции)
Или функция ВПР

или другой способ

Посоветуйте хорошею книгу по Ёкселю или какой либо материал

[IgorGO]

в Ф8:

=ИНДЕКС($A:$E;ПОИСКПОЗ(МАКС($A:$A);$A:$A;);СТОЛБЕЦ()-3)

потом копируете Ф8 2 раза в ячейки правее

читайте инет и справку.
в инете увидите решение конкретных задач из справки получите полную информацию о тех или иных функциях. собственно в справке по Ексел полно примеров

[adamant63]

Спасибо. А можно в место "макс" вставить "наибольший"

[adamant63]

Сообщение от IgorGO

в Ф8:

=ИНДЕКС($A:$E;ПОИСКПОЗ(МАКС($A:$A);$A:$A;);СТОЛБЕЦ()-3)

потом копируете Ф8 2 раза в ячейки правее

читайте инет и справку.
в инете увидите решение конкретных задач из справки получите полную информацию о тех или иных функциях. собственно в справке по Ексел полно примеров

Спасибо. А можно в место "макс" вставить "наибольший"

[adamant63]

Сообщение от adamant63

Спасибо. А можно в место "макс" вставить "наибольший"

Спасибо, разобрался. )

[IgorGO]

да, Наибольший(ГДЕ; КАКОЙ)