powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ворд 2003 Автоматическое копирование
19 сообщений из 19, страница 1 из 1
Ворд 2003 Автоматическое копирование
    #37211459
NataRV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Решила вынести вопрос в отдельную тему. Как в ворде 2003 сделать поле-клон, т.е. заполняем одно поле, а текст автоматически копируется и в другое поле (например пишем фамилию вверху документа, и фамилия автоматически копируется вниз документа, там где должна быть подпись).
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37211943
NataRV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Подскажите, как в макросе обратиться к "Текстовому полю" из панели "Формы"?
Например есть 2 поля (в параметрах закладках "Текстового поля", закладка:): Ishodnik и Itog
Хочу написать макрос и применить к полю Ishodnik "при выходе", должно быть написано что-то типа: Itog.Value=Ishodnik.Value
Только как обратиться к текстовому полю?
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37212253
NataRV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ну почему Вы меня игнорируете?
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37212417
NataRV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в общем ситуация - на своем компе создала файл и с панели "Элементы управления" вставила 2 поля, написала минимакрос - текст2=Текст1, на моем компе все замечательно, перебросила в сеть - с моей машины все работает, а с других - нет, как быть?
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37212776
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
NataRV, поле Плюс, тогда
If Len(ActiveDocument.FormFields("Плюс").Result) = 0 Then ActiveDocument.FormFields("Плюс").Result = "что хочу"
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37213350
MAYAKOV_SV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
NataRVс моей машины все работает, а с других - нет, как быть?
Макросы отключаются у них, возможно по причине такой настройки безопасности.
Сервис->Безопасность->Защита от макросов->Уровень безопасности...
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37213406
NataRV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MAYAKOV_SV, Ципихович Эндрю СПАСИБО ВАМ ОГРОМНОЕ!!!

Только теперь пользователи хотят, чтобы во второе поле вставлялось в родительном падеже... вот теперь думаю как это сделать...
Конечно если не сделаю, то не убьют, но может кто знает как это сделать?

p.s. вот мой вариант:

Private Sub TextBox1_Change()
TextBox2.Value = TextBox1.Value
End Sub

может есть какя-нибудь функция, типа РодительныйПадеж(TextBox1.Value)
или с удовольствием все перелаю на поля из п.и."Формы", если с ними будет легче достучаться до родительного падежа. Заранее спасибо всем кто откликнется !!!
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37213449
MAYAKOV_SV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
NataRVТолько теперь пользователи хотят, чтобы во второе поле вставлялось в родительном падеже... вот теперь думаю как это сделать...
Честно говоря - это целая песня. Это не так просто, как кажется.
К примеру, в одной системе сделано так: есть библиотека, в которой эта операция производится. Т.е. на форме появляется родительный падеж. А потом, в том случае, если прога сформировала неверно, пользователь сам корректирует как надо.
Вот ссылка на эту тему:
http://www.sql.ru/forum/actualthread.aspx?tid=219325&hl=%f0%ee%e4%e8%f2%e5%eb%fc%ed%fb%e9%20%ef%e0%e4%e5%e6
Сам не читал, нашел в поиске. Может быть там чего интересное есть.
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37213466
MAYAKOV_SV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
NataRV,

Вот библиотека:
http://kozin1.narod.ru/sql/fio.html
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37215191
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MAYAKOV_SV,
>Честно говоря - это целая песня. Это не так просто, как кажется
Речь о чем, если ФИО то элементарно, а если всё всё то согласен
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37215207
MAYAKOV_SV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ципихович ЭндрюРечь о чем, если ФИО то элементарно, а если всё всё то согласен
Смотрю всякие простые функции - там пол нужно знать, чтобы нормально сформировать. Т.е. нужно где-то в Edit еще пол вводить в документе. Если его нет, то не знаю как можно нормально сформировать падеж. Элементарно не получится, как мне кажется, хотя может и ошибаюсь.
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37215210
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MAYAKOV_SV, пол, легко окончания отчества, если без отчества выведет запрос, мол раскройте тайну мальчик или девочка
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37215579
MAYAKOV_SV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ципихович ЭндрюMAYAKOV_SV, пол, легко окончания отчества, если без отчества выведет запрос, мол раскройте тайну мальчик или девочка
Можно, конечно сделать что-нибудь по проще. Вопрос в том удовлетворить ли это пользователей? По ситуации нужно смотреть.
В принципе, можно написать простую функцию и в случае если она сформирует неверно - пусть пользователь корректирует.
Вот сейчас сделал запрос у себя - нашел 11 жещин с окончением в фамилии 'ОВ' и 12 женщин с окончанием отчества на 'ИЧ'. Хотя львиная доля отчеств заканчивается на 'НА' (это я про женщин). У мужчин на 'ИЧ'.

Статистика количества фамилии/отчеств в порядке убывание количеств.
Мужчины, фамилии : ОВ, ИН, ЕВ, ИЙ, КО, ЕВ, ЫН, ИЧ, УК, ИК.
Женщины, фамилии: ВА, НА, АЯ, КО, ИК, ИЧ, УК, ЮК, ЕЦ.

Мужчины, отчество: ИЧ, НА, ЛЫ.
Женщины, отчество: НА, ИЧ, ВА.

Такая вот статистика. Что касается отчества, судя по списку - не зацепишся. Но так как у решающего большинства женщин отчество заканчиваются на 'НА', то можно считать вероятнее всего, что это женский пол.
Т.е. можно сделать более или менее качественную процедуру.
Вопрос в том, насколько качественная она нужна NataRV?
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37217147
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MAYAKOV_SV, только по отчеству, и не забывайте об отчестве
...оглы
... кызы
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37217966
NataRV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо огромное всем кто откликнулся!!! Извините, что раньше не ответила - была в командировке.
Падеж нужен в одном месте - Вначале пишем ФИО, а потом по документу "в лице....." и там хотят чтобы не в именительном, а в родительном падеже были фамилия, имя и отчество.
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37218023
MAYAKOV_SV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
NataRVСпасибо огромное всем кто откликнулся!!! Извините, что раньше не ответила - была в командировке.
Падеж нужен в одном месте - Вначале пишем ФИО, а потом по документу "в лице....." и там хотят чтобы не в именительном, а в родительном падеже были фамилия, имя и отчество.
Тогда вам библиотека нужна:
http://kozin1.narod.ru/sql/fio.html
Там вроде примеры с макросами на Word есть.
Поизучайте, я думаю разберетесь.
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37218884
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MAYAKOV_SV, с ума сойти такая помпезность и преобразовывает в творительный падеж
Гуль Андрей Константинович
как
Гуле Андрее Константиновиче
Ошибка в отчестве!!!!!
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37219467
MAYAKOV_SV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ципихович ЭндрюОшибка в отчестве!!!!!
А сколько ошибок будет при формировании падежей в самодельной процедурке длиною в страницу или две...
Я думаю больше.
Кстати, там есть словарь исключений.
Честно говоря сам не смотрел библиотеку, но чую, что это то что нужно.
Область примененияПредлагаемая программа может применяться в приложениях, требующих преобразования имен собственных в форму различных падежей. В частности, в системах автоматизированной подготовки приказов, формирования различных справок, обработки почтовой корреспонденции и пр.

Минус в одном я вижу - установка этой библиотеки.
Т.е. пользователю, чтобы воспользоватся, нужно будет установить ее себе на компьютер.
Вообще имеет смысл всего этого, если часто все это используется.
Иной раз и проще пользователю самому вводить "в лице ...".
Мое дело предложить, я не хочу навязыватся

Пусть NataRV решает, что ей лучше-то:
1) Писать самодельную процедурку с большим процентом брака в преобразованиях Процент брака зависит от сложности ФИО для данной организации. Чем чаще появляются "нестандартные" ФИО, тем чаще компьютер будет делать неправильно преобразование.
2) Воспользоватся данной библиотекой или какой другой, но с проблемой установки ее на компьютеры пользователей.
3) Сказать пользователям, чтобы сами склоняли падежи без автоматизации.
...
Рейтинг: 0 / 0
Ворд 2003 Автоматическое копирование
    #37219534
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MAYAKOV_SV, я очень сильно извиняюсь: Гуле Андрее Константиновиче
Нет ошибки в отчестве!!!!!
просто я такое сам писал, но в предложный падеж мне не надо было потому и бросилось в глаза
Ну вообще то это очень смело с другого падежа переделывать в именительный
Одним словом пользоваться не буду, потому, что то что сам написал ближе к телу и если ошибку увижу сам же и поправлю
...
Рейтинг: 0 / 0
19 сообщений из 19, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ворд 2003 Автоматическое копирование
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]