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

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Вытащить значения из документа, и рассортировать по столбцам (Форматирование/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)

Ответить

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]