Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Сфера Microsoft » Microsoft Office (Word, Excel, Outlook и т.д.) » 2010 - Макрос нумерации формул в Word

Ответить
Настройки темы
2010 - Макрос нумерации формул в Word

Пользователь


Сообщения: 64
Благодарности: 5

Профиль | Отправить PM | Цитировать


Изменения
Автор: Starter1
Дата: 01-05-2013
Всем доброго времени суток.
Есть документ в котором есть некоторые формулы.
Вид такой:
Код: Выделить весь код
Толщина диска: 
С = (0,1...0,17) • Re = 0,1 • 212,213 = 21,221 мм   21 мм.	(6.20)
где Re = 212,213 мм - внешнее конусное расстояние.
Формулы помечены: тут например (6.20).

Документ большой (более 60 стр), формул ещё больше.

Необходимо все формулы разместить по центру, а номер формулы заменить на ссылку по ГОСТу (например ([1], c. 123) ). Есть другой документ в котором есть эти формулы и ссылки у них уже проставлены. Естественно формулы во втором доке могут быть не по порядку.

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

Заранее спасибо! Документ в качестве примера прикрепил

Отправлено: 10:27, 26-04-2013

 

Ветеран


Сообщения: 27449
Благодарности: 8087

Профиль | Отправить PM | Цитировать


Часть формул — рисунки, часть — простой текст, часть — текст вперемежку с полями… И ни одна не оформлена отдельным стилем. Что прикажете делать?!

Так что с:
Цитата Starter1:
Необходимо все формулы разместить по центру, »
только так: создаёте потребный стиль для формул, вешаете его применение на горячую клавишу и — вперёд, ручками. Выделили/стали мышкой на абзац — нажали горячие клавиши.

По второму:
Цитата Starter1:
а номер формулы заменить на ссылку по ГОСТу (например ([1], c. 123) ). Есть другой документ в котором есть эти формулы и ссылки у них уже проставлены. Естественно формулы во втором доке могут быть не по порядку.

Прошу помощь в создании макроса который … и заменил бы номера на соответствующие гостовские ссылки, которые брались бы из другого документа. Явно в макросе должна быть функция сравнения формул прежде чем забирать текст ссылки. »
ничего нельзя сказать без второго документа и конкретного примера.

Отправлено: 11:07, 26-04-2013 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Пользователь


Сообщения: 64
Благодарности: 5

Профиль | Отправить PM | Цитировать


Iska, Про первое пожалуйста покажите пример.
Второе, вложил доки. Первый PZ.doc сам док который нужно обработать, второй formula.doc док с формулами.

Последний раз редактировалось Starter1, 01-05-2013 в 17:04.


Отправлено: 13:49, 26-04-2013 | #3


Пользователь


Сообщения: 64
Благодарности: 5

Профиль | Отправить PM | Цитировать


Iska,
читать дальше »
тут нашёл способ при помощи табуляции сделать выравнивание. Во всех строках с формулами установлены позиции табуляции выравнивание по левому краю, на линейке позиция стоит на 15. Так вот можно отрегулировать одну формулу как надо и уже потом сделать Формат по образцу.

Всё бы хорошо но тыкать в ручную на 60 страницах это долго. Можно ли автоматизировать этот процесс? Макрос пусть переберет каждую строку, он искал бы строку где есть хотя бы один tab и круглые скобки. Как макрос найдёт такую, то применит Формат по образцу в добавок поставит tab в начале (нужно для выравнивания).

А всё разобрался как можно сделать выравнивание.

Лучше скажите как сравнить формулы. Да, я понимаю что это рисунки, хотя иногда встречаются и однострочные формулы вот они не рисунки вовсе, поэтому сравнивать нужно всё что есть в строке без табов, пробелов, круглых скобок и всё что в них. Если текст то понятно а вот рисунки разве нельзя сравнить по высоте, ширине и по размеру в байтах?

Последний раз редактировалось Starter1, 26-04-2013 в 19:33.


Отправлено: 19:09, 26-04-2013 | #4


Ветеран


Сообщения: 27449
Благодарности: 8087

Профиль | Отправить PM | Цитировать


Цитата Starter1:
тут нашёл способ при помощи табуляции сделать выравнивание. »
Изучайте работу со стилями: microsoft word стили - Поиск в Google.

Отправлено: 06:11, 27-04-2013 | #5


Ветеран


Сообщения: 27449
Благодарности: 8087

Профиль | Отправить PM | Цитировать


Цитата Starter1:
а вот рисунки разве нельзя сравнить по высоте, ширине и по размеру в байтах? »
Во-первых, во втором документе нет рисунков. Во-вторых, «по размеру в байтах» — это как? В Word'е нет возможности напрямую узнать размер рисунка в байтах. По ширине/высоте — можно, но что это даст, если таковых окажется несколько?

Теперь по работе. Как оформите единым стилем все формулы в первом документе (и вновь выложите его сюда) — можно будет думать про перебор, поиск и «выдёргивание» данных.

Отправлено: 08:52, 27-04-2013 | #6


Пользователь


Сообщения: 64
Благодарности: 5

Профиль | Отправить PM | Цитировать


Iska, Насчёт стиля. Стиль создал как нужно. Прикрепил первый документ (его част, для теста пойдёт).

Последний раз редактировалось Starter1, 01-05-2013 в 17:04.


Отправлено: 23:01, 27-04-2013 | #7



Компьютерный форум OSzone.net » Сфера Microsoft » Microsoft Office (Word, Excel, Outlook и т.д.) » 2010 - Макрос нумерации формул в Word

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
2010 - в word 2010 не работает редактор формул vin10 Microsoft Office (Word, Excel, Outlook и т.д.) 2 08-12-2015 14:49
2010 - Макрос для Word 2010 из 2003 seven.ap Microsoft Office (Word, Excel, Outlook и т.д.) 4 04-10-2013 12:57
2010 - Word 2010 - как изменить настройки по умолчанию для маркеров/нумерации? JGL Microsoft Office (Word, Excel, Outlook и т.д.) 2 07-02-2012 18:41
2010 - Word | Как добавить нумерацию формул? dimas777 Microsoft Office (Word, Excel, Outlook и т.д.) 14 27-01-2012 04:47
2010 - Проблема с редактором формул (Word 2010) inetcrack Microsoft Office (Word, Excel, Outlook и т.д.) 17 05-05-2011 21:11




 
Переход