Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel & VBA - Разбиение текста в ячейке на несколько ячеек с частями этого текста. / 10 сообщений из 10, страница 1 из 1
14.03.2007, 09:44:07
    #34389226
Zapekank0
Zapekank0
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & VBA - Разбиение текста в ячейке на несколько ячеек с частями этого текста.
Есть столбец, в котором в одной ячейке находится текст:

А
B
C

Текст в ячейке разделен "Ентером".

Как можно разделить одну ячейку, содержащую этот текст на три с текстом в каждой "А", "В", "С" ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.03.2007, 09:53:27
    #34389265
KL (XL)
KL (XL)
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & VBA - Разбиение текста в ячейке на несколько ячеек с частями этого текста.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Sub Test()
    [A1:A10].TextToColumns _
        Destination:=[A1], _
        DataType:=xlDelimited, _
        ConsecutiveDelimiter:=True, _
        Other:=True, _
        OtherChar:=Chr( 10 )
End Sub

KL
[MVP - Microsoft Excel]
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.03.2007, 10:01:18
    #34389287
Zapekank0
Zapekank0
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & VBA - Разбиение текста в ячейке на несколько ячеек с частями этого текста.
Спасибо, это примерно то, что нужно мне. А можно ли, расположить разбитый текст не в строку а по ячекам в столбец?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.03.2007, 10:10:16
    #34389314
Zapekank0
Zapekank0
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & VBA - Разбиение текста в ячейке на несколько ячеек с частями этого текста.
Просто я хочу из следующего вида
Номер Текст
1 А
B
C
2 F
G

Хочу получить вид
Номер Текст
1 А
1 B
1 C
2 F
2 G
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.03.2007, 10:36:59
    #34389411
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & VBA - Разбиение текста в ячейке на несколько ячеек с частями этого текста.
Zapekank0Просто я хочу из следующего вида
Номер Текст
1 А
B
C
2 F
G

Хочу получить вид
Номер Текст
1 А
1 B
1 C
2 F
2 G
скопируй, специальная вставка -> галочка "транспонировать"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.03.2007, 11:44:41
    #34389709
Zapekank0
Zapekank0
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & VBA - Разбиение текста в ячейке на несколько ячеек с частями этого текста.
Еще вопрос...
Как можно заменить "Ентер" в ячейке на ";" ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.03.2007, 12:26:30
    #34389873
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & VBA - Разбиение текста в ячейке на несколько ячеек с частями этого текста.
Код: plaintext
=SUBSTITUTE(A1;CHAR(10);";")
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.03.2007, 13:54:48
    #34390185
Zapekank0
Zapekank0
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & VBA - Разбиение текста в ячейке на несколько ячеек с частями этого текста.
Range("R22").Formula = "=SUBSTITUTE(" + ActiveCell.Address + ", Chr(10), Chr(59))"
возникает ошибка #ИМЯ?

Range("R22").Formula = "=SUBSTITUTE(" + ActiveCell.Value + ", Chr(10), Chr(59))"
возникает ошибка #ЗНАЧ!

Подскажите в чем проблема?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.03.2007, 14:12:49
    #34390275
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & VBA - Разбиение текста в ячейке на несколько ячеек с частями этого текста.
Chr(10) -> CHAR(10)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.03.2007, 14:15:45
    #34390286
Zapekank0
Zapekank0
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & VBA - Разбиение текста в ячейке на несколько ячеек с частями этого текста.
Спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel & VBA - Разбиение текста в ячейке на несколько ячеек с частями этого текста. / 10 сообщений из 10, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 384ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2183309]:
 0ms
get settings:
 12ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 51ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 45ms
get tp. blocked users:
 2ms
others: 240ms
total:  384ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]