Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Word
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.11.2011, 11:46   #1
Czun
 
Регистрация: 11.11.2011
Сообщений: 5
По умолчанию поле со списком

Составил документ в Word. В нем есть несколько полей со списками. Хочу сделать так, чтобы при выборе одного параметра в одном поле, параметры в других полях автоматически менялись.

Например, есть 6 полей со списками и в них 12 месяцев года (январь, февраль, и т.д.) И если бы я выбрал в первом поле январь, чтобы в остальных было так: во втором поле - февраль, в третьем - март, ну, вы поняли.

как это сделать?
Czun вне форума Ответить с цитированием
Старый 11.11.2011, 16:06   #2
Sasha_Smirnov
Особый статус
Участник клуба
 
Аватар для Sasha_Smirnov
 
Регистрация: 24.11.2008
Сообщений: 1,535
По умолчанию

Ну мы поняли, а заготовочку-то не приложите? Да и конечная цель интересна.

(Если типа календарной сетки, то рулит скорее Excel.)

Последний раз редактировалось Sasha_Smirnov; 11.11.2011 в 16:09.
Sasha_Smirnov вне форума Ответить с цитированием
Старый 11.11.2011, 18:40   #3
Czun
 
Регистрация: 11.11.2011
Сообщений: 5
По умолчанию

Цитата:
Сообщение от Sasha_Smirnov Посмотреть сообщение
а заготовочку-то не приложите? Да и конечная цель интересна.
нет проблем. Это шаблон справки о зарплате для бухгалтера. Хочу облегчить ей труд. Если что, Word - 2007.
Вложения
Тип файла: rar Шаблон справки о зарплате.rar (15.8 Кб, 32 просмотров)

Последний раз редактировалось Czun; 11.11.2011 в 18:49.
Czun вне форума Ответить с цитированием
Старый 12.11.2011, 05:19   #4
Sasha_Smirnov
Особый статус
Участник клуба
 
Аватар для Sasha_Smirnov
 
Регистрация: 24.11.2008
Сообщений: 1,535
По умолчанию Чем программировать раскрывающиеся списки...

Вставил вместо вашего изобретения поле EMBED (см. приложенный док.). Может, потянет...

Практически, дабл-кликом открываете, 1-й месяц набираете и тянете за угол до 6-го. Месяцы нарастают благодаря тому, что столбцу (в Excel) присвоен формат даты.

То, что напечатается, можно сразу посмотреть по Ctrl-F2. Переключение поле/значение: Alt-F9.

То есть наш "заказчик" открывает эту СПРАВКУ, щёлкает по полю, жмет Alt-F9, дважды щёлкает по табличке [секунд 5 прошло] и вводит месяц; затем протягивает угловой маркер до строки 6. Всё.
Изображения
Тип файла: png Протяжка_за_угол.png (9.0 Кб, 91 просмотров)
Вложения
Тип файла: doc Шаблон справки о зарплате.doc (39.0 Кб, 33 просмотров)

Последний раз редактировалось Sasha_Smirnov; 12.11.2011 в 19:34. Причина: инструкция.
Sasha_Smirnov вне форума Ответить с цитированием
Старый 12.11.2011, 10:32   #5
Czun
 
Регистрация: 11.11.2011
Сообщений: 5
По умолчанию

Очень интересный способ. Но вряд ли бухгалтер потянет это, для нее это будет сложно.

Я надеялся, что можно на VBA написать код для поля со списком. Сам раньше учил Бейсик и Дельфи, хотя сейчас благополучно все забыл.

Есть и еще одна проблема, почему вышеизложенный способ не годится. Если вы щелкнете в моем файле по фамилиям и должностям, то там тоже поля со списками. Я думал, что мне дадут решение для месяцев, а я уже сам сделаю так, чтобы при выборе фамилиии можно было автоматически подставить должность.
Czun вне форума Ответить с цитированием
Старый 12.11.2011, 19:25   #6
Sasha_Smirnov
Особый статус
Участник клуба
 
Аватар для Sasha_Smirnov
 
Регистрация: 24.11.2008
Сообщений: 1,535
По умолчанию Милый-милый наш главбух...

Цитата:
Сообщение от Czun Посмотреть сообщение
Очень интересный способ. Но вряд ли бухгалтер потянет это, для нее это будет сложно.
Тем не менее способ как раз в духе офисных программ Микрософта! Знать бы (разработчикам MS Office) подход к вашему бухгалтеру (или к его учителям) — мы бы тут и не парились на эту тему.

Будем думать в направлении электронных форм (это первая попавшаяся ссылка, но в любой книге по Word это обычно разжёвано как для беззубых!): http://ecm-journal.ru/blog/post/Ehle...a-dannykh.aspx (там внизу, хоть и пространное, но очень дружественное эссе-руководство: http://ecm-journal.ru/post/Ehlektron...likovquot.aspx, как раз на примере Word 2007).

Извините за отписку, просто ваш способ развивать не хочу: зароюсь дня на три.

P/s: что-то мне подсказывает, что такие задачи бухгалтеров учат решать даже на обычных курсах, нет?

Последний раз редактировалось Sasha_Smirnov; 12.11.2011 в 19:41.
Sasha_Smirnov вне форума Ответить с цитированием
Старый 13.11.2011, 02:35   #7
Sasha_Smirnov
Особый статус
Участник клуба
 
Аватар для Sasha_Smirnov
 
Регистрация: 24.11.2008
Сообщений: 1,535
По умолчанию Поля уломал! Эх, теперь бы в бухгалтерию...

Часа два пытал поле DATE (и зря) — выехал в итоге с помощью поля IF.

Заполнение (вместе с открытием файла и полей ASK) заняло сначала 25, а с третьей попытки всего 13 секунд. Если и не пригодится — будет памяткой... или памятником.

На картинке — процесс отладки. Буду рад, если хотя бы испытаете.
Изображения
Тип файла: png Потуги-222.png (25.9 Кб, 95 просмотров)
Вложения
Тип файла: doc Поля-тополя.doc (45.5 Кб, 48 просмотров)

Последний раз редактировалось Sasha_Smirnov; 13.11.2011 в 15:24. Причина: жажда совершенства.
Sasha_Smirnov вне форума Ответить с цитированием
Старый 14.11.2011, 11:49   #8
Czun
 
Регистрация: 11.11.2011
Сообщений: 5
По умолчанию

Идея замечательная. Однако проблема - открыл, все сделал так, как указано в примечании и ничего. может мне чего в настройках Word изменить надо?
Czun вне форума Ответить с цитированием
Старый 15.11.2011, 04:47   #9
Sasha_Smirnov
Особый статус
Участник клуба
 
Аватар для Sasha_Smirnov
 
Регистрация: 24.11.2008
Сообщений: 1,535
По умолчанию

Идея не моя. Как в инструкции к гранате: выдернуть чеку, а дальше... неразборчив☺.

А дальше-то http://macrosoft-cs.narod.ru/Word.html (это на будущее, привет из XX века).

В моём же примере с полями нужно сначала все выделять и жать F9. Попробуете — обсудим.

Вся работа, после тренировки, занимает 6 секунд. Прогресс! (Важно: на OK давите мышкой.)

Последний раз редактировалось Sasha_Smirnov; 15.11.2011 в 04:51.
Sasha_Smirnov вне форума Ответить с цитированием
Старый 15.11.2011, 05:45   #10
Czun
 
Регистрация: 11.11.2011
Сообщений: 5
По умолчанию

Ок, все работает. Дальше буду сам думать, может, чего и получится.
Czun вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Access поле со списком julia89spb Помощь студентам 0 28.05.2011 14:22
поле со списком new_here Microsoft Office Access 2 03.10.2010 19:08
Поле со списком Diamand Microsoft Office Access 4 14.05.2010 21:28
Поле со списком Underfinder Microsoft Office Access 7 21.03.2010 17:17
Поле со списком d_adilet Microsoft Office Access 5 08.02.2010 07:37