powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Суммирование времени за месяц.
15 сообщений из 40, страница 2 из 2
Суммирование времени за месяц.
    #39761810
Максим84
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sdku,
помогите, пожалуйста, в последней базе которую прислали прописать выбор года, а то я совсем с кодам не дружу.
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761813
Максим84
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Максим84,
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761820
DarkMan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Максим84sdku,
помогите, пожалуйста, в последней базе которую прислали прописать выбор года, а то я совсем с кодам не дружу.
Я извиняюсь , что сую свой нос. Может sdku занят, а ТС как всегда невтерпеж получить ответ.
Сделал Вам комбобокс выборка года . Далее ничего не делал , так как нет времени и мой Access отказывается открывать VBA скорее всего из за русской локализации access .
И еще немного покритикую . Зачем Вам в базе таблицы месяц и год. Вы что ? каждый год будете добавлять года? А не лучше ли года извлекать из таблицы работ ????? Про месяца я не настаиваю, так как их всего 12 , может и можно оставить. Спасибо. Хорошего дня. :))
P.S и советую иногда гуглить и заглядывать в FAQ , если Вам будут выкладывать готовые примеры , это большой пользы не даст. Нужно разобраться в логике. А написать говнокод, дело не хитрое.
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761825
DarkMan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761827
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Совсем хорошо(и по-моему правильно) было бы учитывать рабочее время "начало" и "конец" в полном формате даты-все бы легко считалось, а самое главное были бы не нужны таблицы год(она и так не особо нужна) и месяц,появилась бы возможность извлекать данные за период времени
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761832
Максим84
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
DarkMan, спасибо конечно, но мне в терпёж могу и день и два и неделю подождать так как делаю для себя, а не для кавота.
А вот какой смысл было подсказывать на половинно я не вижу. (ходя бы код написали бы).
P.S.Большим к вам уважением.
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761834
Максим84
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sdku, опять не стыковочка.
В таблице zp идёт сортировка по месяцу, а год не учитывается (туда просто добавить поле год) и через форму, когда выбираешь год рабочее время подставляется, а вот заработок привязан к месяцу.
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761847
DarkMan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Максим84А вот какой смысл было подсказывать на половинно я не вижу. (ходя бы код написали бы).
Ну от скромности Вы точно не умрете. :))
P.S полностью код пишут в подфоруме Работа , за определенное вознаграждение.
А здесь Вам могут оказать только помощь подсказками или исправлениями готового кода.
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761857
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Максим84sdku, опять не стыковочка.
В таблице zp идёт сортировка по месяцу, а год не учитывается (туда просто добавить поле год) и через форму, когда выбираешь год рабочее время подставляется, а вот заработок привязан к месяцу.A где Вы увидели сортировку (Сортировка и отбор-разные вещи)
Еще как учитывается, просто поля не очищаются. Дополните процедуру блоком IF
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
Sub zarabotok()
Dim vr, zp
vr = DSum("left(времяТекст,2)*60 + right(времяТекст,2)", "tbl", "month(дата)=" & Me.mes _
 & " and year(дата)=" & Me.комбинированная10) 'учет года
If IsNull(vr) Then 'добавлен блок IF
    MsgBox "нет записей отвечающих критерию"
        Me.zp = ""
            Me.minut = ""
        Me.zpCas = ""
    Exit Sub
End If
zp = DLookup("заработок", "ZP", "месяц=" & Me.mes)
Me.zp = zp
Me.minut = vr \ 60 & " час " & vr - (vr \ 60) * 60 & " мин.   (" & vr & " мин.)"
Me.zpCas = Round(zp / vr * 60, 2)
End Sub
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761865
Максим84
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sdku,
Вы извините наверное будет глупый вопрос, но всё же что это такое ( Дополните процедуру блоком IF) это значит разместить кнопку и по нажатию прописать этот код?
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761869
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Максим84,
никаких элементов управления добавлять не надо-просто замените текст процедуры (добавились строки от "IF... " до "END IF" ) zarabotok на эту 21789284
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761878
Максим84
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sdku, спасибо всё обновляется, но вот только доход по годам меняется как водить данные в таблицу zp там нет года, а через форму он подставляет по месяца.
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761880
Максим84
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Максим84,

забыл прекрепить.
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761883
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Максим84....Знаю сколько я заработал за месяц хочу выяснить сколько я зарабатываю за один час....Максим84sdku, спасибо всё обновляется, но вот только доход по годам меняется как водить данные в таблицу zp там нет года, а через форму он подставляет по месяца.Ну так добавьте поле"год" в таблицу ZP и отбор по нему в форму
Этот топик напоминает мне сказку "Каша из топора"-все что знал сказал, а дальше-сами
...
Рейтинг: 0 / 0
Суммирование времени за месяц.
    #39761888
Максим84
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sdku, Самое, самое большое СПАСИБО.
...
Рейтинг: 0 / 0
15 сообщений из 40, страница 2 из 2
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Суммирование времени за месяц.
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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