Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Вытащить значения из документа, и рассортировать по столбцам - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Вытащить значения из документа, и рассортировать по столбцам (Форматирование/Formattings)
Вытащить значения из документа, и рассортировать по столбцам
Дмитрий87 Дата: Четверг, 06.10.2016, 17:41 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 0 ±
Замечаний: 0% ±

Добрый день! Помогите профи! Нужно вытащить значения и разбить по столбцам в следующей схеме:
1 столбец uid (преобразовать как гиперссылку вида vk.com/здесь_uid)
2 столбец first_name
3 столбец last_name

Очень нужно!!!
К сообщению приложен файл: vk.xls (20.0 Kb)
 
Ответить
СообщениеДобрый день! Помогите профи! Нужно вытащить значения и разбить по столбцам в следующей схеме:
1 столбец uid (преобразовать как гиперссылку вида vk.com/здесь_uid)
2 столбец first_name
3 столбец last_name

Очень нужно!!!

Автор - Дмитрий87
Дата добавления - 06.10.2016 в 17:41
buchlotnik Дата: Четверг, 06.10.2016, 18:49 | Сообщение № 2
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация: 929 ±
Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG
на регулярках: [vba]
Код
Function reg(t$, i%, j %)
    With CreateObject("VBScript.Regexp")
        .Global = True
        .Pattern = "\{[^\{]+\}"
        s = .Execute(t)(i)
        .Pattern = "\:[^\:]+(\,|\})"
        s = .Execute(s)(j)
        .Pattern = "[\:\""\,\}]"
        reg = .Replace(s, "")
    End With
End Function
[/vba]
К сообщению приложен файл: 0399362.xls (36.0 Kb)


Сообщение отредактировал buchlotnik - Четверг, 06.10.2016, 19:31
 
Ответить
Сообщениена регулярках: [vba]
Код
Function reg(t$, i%, j %)
    With CreateObject("VBScript.Regexp")
        .Global = True
        .Pattern = "\{[^\{]+\}"
        s = .Execute(t)(i)
        .Pattern = "\:[^\:]+(\,|\})"
        s = .Execute(s)(j)
        .Pattern = "[\:\""\,\}]"
        reg = .Replace(s, "")
    End With
End Function
[/vba]

Автор - buchlotnik
Дата добавления - 06.10.2016 в 18:49
Дмитрий87 Дата: Пятница, 07.10.2016, 12:23 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 0 ±
Замечаний: 0% ±

buchlotnik, Большое спасибо! Только как сделать гиперссылку в первом столбце?
 
Ответить
Сообщениеbuchlotnik, Большое спасибо! Только как сделать гиперссылку в первом столбце?

Автор - Дмитрий87
Дата добавления - 07.10.2016 в 12:23
buchlotnik Дата: Пятница, 07.10.2016, 12:53 | Сообщение № 4
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация: 929 ±
Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG
используйте функцию ГИПЕРССЫЛКА() - мне сейчас не проверить -на работе соцсети залочены
 
Ответить
Сообщениеиспользуйте функцию ГИПЕРССЫЛКА() - мне сейчас не проверить -на работе соцсети залочены

Автор - buchlotnik
Дата добавления - 07.10.2016 в 12:53
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Вытащить значения из документа, и рассортировать по столбцам (Форматирование/Formattings)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!