создание именного указателя

[caute]

Понадобилось создать именной указатель для тома за 800 стр., имён тьма - вот, сижу и напряженно думаю, как бы часть работы взвалить на плечи добрых самаритян
План действий в макросе примерно такой.
1. Отобрать двух(и более)буквенные слова, написанные с заглавной буквы, остальное стереть.
2. Рядом с каждым указать номер страницы, на которой это слово встретилось (ессно, страницы заранее были разделены разрывами и пронумерованы, как обычно при верстке).
3. Сортируем строки по алфавиту.

Дальше пора задействовать человеческий фактор. Хотя, наверное, можно что-то еще придумать. Например,
4. удалить одинаковые слова из итогового списка, оставив только самое первое из них, а цифры (номера страниц) оставить все, разделив запятыми.
Получился бы готовый именной указатель, из которого нужно просто убрать лишнее руками.
А в заключение (не сочтите за наглость) можно
5. автоматически отформатировать список имен встроенными стилями Word для создания указателя.

Если хотя бы части 1 и 2 этого плана удастся осуществить, сэкономятся многие часы рутинной работы. А для редакторов-профи даже не часы - дни и недели.

[shanemac51]

примерно так

см.приложение

[caute]

смотрю в ваше приложение и не вижу там ни слова про указатели.
возможно, вы хотите намекнуть, что Word 2007 умеет их делать?
(у меня Word 2003, проверить прямо сейчас не могу, но на работе стоит 2007)

[shanemac51]

я вообще никогда не применяла указатели

составила же список слов по заданным условиям с номерами страниц и поместила в таблицу

подробнее не разбиралась, они мне пока не нужны

[caute]

shanemac51
предлагаю вам проделать эксперимент: возьмите текст страниц этак на 800, где на каждой странице десяток-другой имён, а потом "составьте список слов с номерами страниц". К тому времени, когда вы закончите "помещать их в таблицу", вы станете на год-другой старше и мудрее...

[shanemac51]

сейчас зациклю свои 7 страниц на 100 циклов--посмотрю

идет на 12-15 минут, надо оптимизировать

нашла файл на 400 страниц, зациклю 2-3 раза

[caute]

честно говоря, не вкурил я, что и как вы зацикливаете, но заинтригован - жду.
токо поясните для профанов пошагово

[shanemac51]

запустила на 600 листов, реальная книга по экономике

уже прошло 500 страниц--5 минут

610 страниц
5мин 18 сек
1430 слов по условию

[caute]

не томите, девушка, - поделитесь методой

[shanemac51]

написала макросик --30 строк
количество листов --мало критическо

больше зависит от количества выбранных слов, вернее их суммарной длины(до 32000 символов)

если больше --надо править макрос

сейчас вставлю блокиратор на 32000 и выложу, попробуйте

надеюсь, вы умеете работать с макросами
-открыть ваш файл
-вставить макрос в шаблон
-запустить макрос
-будет создан дополнительный файл
-на его обработку пока ничего не писала
---выделить все
---сортировать
---вставить таблицу, преобразовав из текста, разделитель табулятор, размер по размеру окна
---запомнить под свое емя
-----------------ок----------------------