Критерий отбора текста (пока только вопрос)

[strannick]

Добрый день форумчане! Всех с прошедшим праздником!
Тут вот какой вопрос возник. Есть ряд WORDовских документов. Они импортируются в Excel, где осуществляется их обработка. Название каждого документа выделено жирным шрифтом. Название - это одна из позиций, которую надо отобрать из текста. Можно ли в Excel выделение жирным шрифтом части текста задать как критерий отбора для переноса таких строк на другой лист?
Спасибо.

[Hugo121]

В макросе можно.

[strannick]

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

[Hugo121]

Давайте пример своего текста в файле - от этого будет зависеть строчка.
А так в общем случае вот:

Sub tt()
Dim cc As Range
For Each cc In [a1:a3]
If cc.Font.Bold = True Then MsgBox cc.Value
Next
End Sub

[IgorGO]

вообще-то есть варианта выделенного жирным:
жирная ячейка -- когда шрифт ячейки имеет свойство - полужирный
и
жирная ячейка -- фрагмент текста в ячейке имеет аналогичное свойство

Вы, собственно чем интересуетесь?

[Hugo121]

Да, по первому посту я понял, что будет "жирная ячейка", поэтому и прошу файл.
Ещё может случиться, что текста нет, а "жирность" есть.

[strannick]

Во вложении пример WORDовского файла. Таких файлов энное количество. Загнать поочередно в Excel, выбрать:
1. Название (выделено жирным).
2. Автора (авторов) - как правило расположены под названием, но не всегда.
3. E-mail (если есть) - как правило под данными авторов.
Перенести на отдельный лист в последнюю пустую строку.
Если с названием (выделено жирным как критерий) и e-mail (критерий @) вроде понятно, то вот с автором думаю не выйдет. Только по месту расположения?
При простом копипасте из Word в Excel форматирование жирным сохранялось.

[nerv]

Мне кажется будет проще в word'е делать нужный отбор, а потом загружать в excel. С данной задачей должны справиться регулярные выражения, если Вы умеете их писать.

И еще. Сегодня видел подобную "задачу" в категории работа на одном из ресурсов сети. Т.е. нужно обработать инфу за деньги. Я как бы сам себе грабли не расставляю, поэтому коды писать за бесплатно не собираюсь.

[strannick]

С регулярными выражениями в Word не знаком вообще. А по поводу работы, так это мой знакомый и разместил. Кстати, код я пи не просил. Принципиально важна часть отбора по критерию "жирности" текста, остальные критерии понятны для меня. Один - не реализуем, другой - реализуем. Поэтому, думаю, Excel в этом варианте не очень поможет. Слишком все расплывчато. И много ручной постобработки. Мне интересен был сам принцип, поэтому изначально и был только вопрос.

[nerv]

Кстати, код я пи не просил

Да, в названии темы это отражено.

Один - не реализуем

Какой именно?

Принципиально важна часть отбора по критерию "жирности" текста

За эту часть отвечает определенное свойство объекта