0 / 0 / 0
Регистрация: 20.06.2012
Сообщений: 4
1

Разделить текст в ячейке на несколько

20.06.2012, 12:27. Показов 10158. Ответов 9
Метки нет (Все метки)

Здравствуйте!. Помогите разбить содержимое ячейки на несколько, что было вот так:
Вложения
Тип файла: xlsx текст.xlsx (86.2 Кб, 232 просмотров)
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.06.2012, 12:27
Ответы с готовыми решениями:

Необходимо разделить текст в ячейке на две. Граница vbCrLf
не пойму что-то как разделить текст в ячейке, которая содержит знак красной строки vbCrLf. Мне...

Подскажите, как разделить текст в ячейке на несколько столбцов (разные разделители)
Добрый день. Access. Не могу решить проблему, есть текст в ячейке формата: ...

Как разделить текст в ячейке по символам
Всем привет! Добавлено через 6 минут В общем есть такая задачка: Нужно вынуть из этой формулы...

Как разделить слипшийся текст в ячейке по Заглавным буквам и Числам
Как разделить слипшийся текст в ячейке по Заглавным буквам и Числам? При выгрузке из одной...

9
2631 / 1331 / 255
Регистрация: 25.10.2010
Сообщений: 2,194
20.06.2012, 12:51 2
Думаю, что есть текстовый документ - источник данных. Можете выложить?
0
105 / 78 / 21
Регистрация: 16.04.2012
Сообщений: 215
20.06.2012, 13:07 3
А что тут сложного то?? меню Данные-> текст по столбцам и следуйте указаниям
1
0 / 0 / 0
Регистрация: 20.06.2012
Сообщений: 4
20.06.2012, 13:30  [ТС] 4
Вот источник, это первая страничка:
Вложения
Тип файла: doc источник.doc (99.5 Кб, 66 просмотров)
0
105 / 78 / 21
Регистрация: 16.04.2012
Сообщений: 215
20.06.2012, 13:46 5
Думаю в вашем случае преобразовать текст в таблицу в ворде, прошу за выражение, более "геморное дело" нежели в екселе разбивать строки, но все равно придется поработать, а как это делать я Вам написала раньше.
Сомневаюсь, что кто-то захочет это делать за Вас, учитывая количество строк
0
2631 / 1331 / 255
Регистрация: 25.10.2010
Сообщений: 2,194
20.06.2012, 14:18 6
loreleu, если сохранить Ваш текстовый документ в формате .txt, а затем сделать импорт в файл Excel с фиксированной шириной столбцов, то получится примерно так, как во вложении, ну, а дальше
Цитата Сообщение от Tanchik_Z Посмотреть сообщение
все равно придется поработать
Вложения
Тип файла: xlsx ИзТекста.xlsx (30.7 Кб, 74 просмотров)
1
0 / 0 / 0
Регистрация: 20.06.2012
Сообщений: 4
20.06.2012, 14:42  [ТС] 7
Спасибо) а можете подсказать, как объединить ячейки, что бы информация не потерялась, кроме верхнего?
0
6154 / 920 / 307
Регистрация: 25.02.2011
Сообщений: 1,338
Записей в блоге: 1
20.06.2012, 15:24 8
можно макросом из исходного текста:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Option Base 1
Option Explicit
 
Sub www()
Dim i&, j&, k&, lr$, a, b, s$()
a = Array(2, 11, 42, 73, 86, 98)
b = Array(9, 31, 31, 13, 12, 29)
 
lr = Cells(Rows.Count, 1).End(xlUp).Row - 1
i = 1
Do
    ReDim s$(1 To 1, 1 To 6)
    Do
        For j = 1 To 6
            s(1, j) = Trim(s(1, j) & " " & Trim(Mid$(Cells(i, 1), a(j), b(j))))
        Next j
        i = i + 1
    Loop While Trim(Mid$(Cells(i, 1), a(1), b(1))) = "" And i <= lr
    k = k + 1
    Cells(k, "C").Resize(1, 6) = s
Loop While i <= lr
End Sub
Вложения
Тип файла: rar Текст.rar (89.8 Кб, 142 просмотров)
1
0 / 0 / 0
Регистрация: 20.06.2012
Сообщений: 4
20.06.2012, 15:58  [ТС] 9
Спасибо большое. Макрос просто чудо))) одним щелчком упростили мне недельную работу)
0
6154 / 920 / 307
Регистрация: 25.02.2011
Сообщений: 1,338
Записей в блоге: 1
20.06.2012, 16:43 10
В макросе небольшие опечатки (которые не мешают ему правильно работать)
В объявлении переменных у lr не правильно задан тип, нужно не string ($), а long (&)
Visual Basic
1
Dim i&, j&, k&, lr&, a, b, s$()
и "-1" при вычислении lr (last row) можно убрать
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
20.06.2012, 16:43
Помогаю со студенческими работами здесь

Требуется обрезать текст по размеру ячейки. По клику по этой ячейке, вывести текст полностью.
Доброй ночи! Прошу помочь с такой задачей.. Нужно вывести текст из бд в таблицу, это как бы не...

Можно ли как то исходное значение в ячейке разделить на составные части и работать с ними
Имеется в одной ячейке значение угла вида:590 59'54&quot; (59 градусов и тд). Переводить эти значения...

Несколько значений в ячейке
Всем привет! Я первый раз создаю базу данных. И вроде структуру привел в более менее адекватный...

Несколько цифр в ячейке
Уважаемые,подскажите пожалуйста,что бы это значило? В ячейке имеется такая запись={6;8;4;10;78}...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
10
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru