|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
26.09.2009, 14:14 | #1 |
Пользователь
Регистрация: 03.09.2009
Сообщений: 28
|
разбор текста
Здравствуйте
На форуме нашла удобный макрос, сорри что не записала кто его предоставил и не высказала слова благодарности, но... Макрос срабатывает странным образом. Пример прилагаю. Помогите преодолеть проблему и объясните в чем фишка? Почему разбор происходит то с запятой, то с пробелом? Проблему пробелов преодолею функцией, а вот с запятыми не получилось справиться |
26.09.2009, 16:20 | #2 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
посмотрите отличие кода для разбора по запятым и по пробелу.Вы все поймете
Обратите внимание на Selection.TextToColumns Comma:=True Selection.TextToColumns Space:=True
Анализ,обработка данных Недорого
|
26.09.2009, 19:25 | #3 |
Пользователь
Регистрация: 03.09.2009
Сообщений: 28
|
Разницу в разборе по запятой и пробелу я знаю еще по штатным возможностям Excel подскажите как в итоговых ячейках убрать запятую. Штатыми способами не получается.
На форуме нашла макрос обещающий убрать запятые и точки в выделенном фрагменте. Но он У МЕНЯ не срабатывает. Наверно что-то делаю не так. Privat Sud CommandButton2_Click () Sub qq() With ActiveSheet.UsedRange arr = .Value .Value = arr End With End Sub В конечном результате хотелось бы убрать запятые и убрать дубликаты |
26.09.2009, 20:38 | #4 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Я Вас не понял,исправляюсь.
Функция Replace возвращает строку, в которой одна последовательность символов заменена на другую указанное количество раз. пример использования во вложении
Анализ,обработка данных Недорого
|
26.09.2009, 23:42 | #5 |
Форумчанин
Регистрация: 06.08.2009
Сообщений: 472
|
не совсем понял проблему, но попробуйте во вложенном файле выделить ячейку с текстом и нажать кнопку Старт
Последний раз редактировалось EugeneS; 26.09.2009 в 23:49. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
разбор текста | Teksa | Помощь студентам | 1 | 10.11.2008 20:14 |
Разбор файла OBJ_TEST | russian-stalker | Общие вопросы Delphi | 11 | 25.08.2008 11:37 |
Разбор XML-документов | Aiorosu | БД в Delphi | 0 | 19.07.2008 20:25 |
Разбор dll | PanGolin | Фриланс | 13 | 26.05.2008 01:56 |