| |
 188 Кб. |
|
| | Как подсчитать?
В форме frmПром при выборе отдела хочу убрать лишнее (поле со списком Квалификация).
Как сделать, чтобы количество ИТР и количество рабочих автоматически вычислялось и проставлялось справа? | |
| |
| |
| |
|
|
| | как-то файл не скачивается  | |
| |
| |
| |
21 Кб. |
|
| | я неправильно вставил | |
| |
| |
| |
24 Кб. |
|
| | вот посмотри на Поле31 - оно обновляется каждый раз как обновляется поле Отдел | |
| |
| |
|
|
| |
|
|
| | я прописал Me.Поле31.Requery в событие при открытии формы, чтоб уже при открытии было видно кол-во ИТР по всем цехам (отделам).
я неправильно делаю?
или хотя бы сделать Поле31 невидимым пока фильтр по отделам не активен
подскажи, пжлста | |
| |
| |
| |
|
|
| | можно:
1. ставим проверку на поле "отдел" формы, если оно равно пусто (Nz(форма!Отдел,0)=0) то нужно изменить строку SQL убрав из нее
AND ((ПромБаза.ПСП)='" & [Forms]![frmПром]![ПолеСоСписком21] & "')
2. при запуске по умолчанию в Поле31 - вывод на экран False - полсе обнеовления поля Отдел -
Me.Поле31.Visible=True | |
| |
| |
| |
28 Кб. |
|
| | я поступил попроще, зацени.
поставил флажок, а в строке состояния - там же видно сколько отфильтрованных.
думаю так лучше
стыдно об этом просить, но я новичок. В форме генерирую отчет, но сама форма остается на переднем плане. Где в свойствах это убрать?
Спасибо. | |
| |
| |
| |
|
|
| | или форму сделать не в режиме диалога (читай у snipe) или отчет открывать в режиме диалога (модальное окно) | |
| |
| |
| |
|
|
| | Private Sub Form_Current()
Me!Поле31 = Me!subfrm.Form.Recordset.RecordCount
End Sub
Private Sub ПолеСоСписком23_AfterUpdate()
ФильтрИТР = "ПромБаза.КодИТР = '" & Me.ПолеСоСписком23 & "'"
ОбновитьТаблицу
Me!Поле31 = Me!subfrm.Form.Recordset.RecordCount
End Sub
формулу из поля31 уберите - пусть поле будет свободным
и будет вам счастье | |
| |
| |
| |
|
|
| | у него в субформе и ИТР и рабочие - а ему нужно выводить 2 значения - рабочие и ИТР.
Me!subfrm.Form.Recordset.RecordCount - даст полный список сотрудникоф отдела.
т.е. опять изголяться  | |
| |
| |
| |
|
|
| | to kot_k_k
там на событие после обновления поля со списком - строчка висит
так что работает для данного примера
to rudi4
у вашей основной формы свойство Всплывающее окно выставлено в значение Да
установите в Нет
и будет работать
соответственно придется отслеживать на чем в каждый момент находится фокус | |
| |
| |
| |
|
|
| | Подскажи, пжлста.
Программа моя почти готова. Как люди делают, что при запуске открывалась только форма, а задняя чать (окно, панели инструментов Access) были уже не видны пользователю
Спасибо. | |
| |
| |
| |
|
|
| | сервис - параметры запуска
убрать все галки
в поле Вывод формы\страницы выбрать имя формы
Учти что открыть базу для редактирования форм и всего остального можно только при нажатом Shift | |
| |
| |
|
|
| |
|
|
| | Все вроде получается. Но вот здесь выдает ошибку на несоответствие типов
Me.subFrm.Form.Filter = " ПромБаза.Прз = False " And " ПромБаза.Преп = 1 "
Таблица ПромБаза, поля Прз тип логический, Преп числовой
когда писал
Me.subFrm.Form.Filter = " ПромБаза.Прз = False "
все нормально, а когда добавил выводит ошибку
подскажи, плиз! | |
| |
| |
| |
|
|
| | воткни в дебагер посмотри чему й тебя равно
Me.subFrm.Form.Filter
поймешь где ошибка
п.с. " ПромБаза.Прз = False " And " ПромБаза.Преп = 1 " получаем
" ПромБаза.Прз = False ПромБаза.Преп = 1 "
а нужно " ПромБаза.Прз = False And ПромБаза.Преп = 1 " - найди 2 отличия | |
| |
| |
|
|
|
|
