いつもお世話になっております。
Access 2007
OS:Windows 7
現在社員原価を作成しております。
個人給与フォームと日報フォームが作りました。
日報フォームの中に原価のテキストボックスに設置します。個人給与フォームから抽出して、個人ごとの原価を計算させたいです。
詳細は以下のようです。
個人フォーム
日付 氏名 基本給 住宅手当 交通手当
1/4 Aさん 190,000 10,000 5,000
1/4 Bさん 170,000 10,000 0
7/1 Aさん 200,000 10,000 5,000
7/1 Bさん 180,000 10,000 10,000
・
・
・
基本給、住宅手当、交通手当:数値型です
日報フォーム
日付 氏名 出勤 退勤 工数 勤務時間 残業 原価
基本計算:
月給 = 基本給+住宅手当+交通手当
日給 = 月給/26
時給 = 日給/8
原価計算:
・残業時間が無い場合:原価 = 日給*工数
・残業時間がある場合:原価 = 日給+(残業時間*時給*1.25)
個人給与フォームのデータが給与調整があるため、常に最新データを取得して、原価計算終了後に原価のテキストボックスに表示できるようになりたいです。
Access のコードが全然分かりませんので助け頂きたいです。
よろしくお願い致します。
A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
すでに検討されていたらお許しいただきたいですが、この種の計算はエクセルでやるべきだと思いますが、なぜアクセスを使われるのですか。
お尋ねしたいです。この回答への補足
アクセスで入れたほうがデーターを管理しやすいです。
自分なりに原価計算クエリを作成できました。日報と結び、個人の日給も表示されようになりました。
しかし、また新しい問題を発生します。
社員の原価はアップする時、最新情報を反映されなかったです。
日報フォームは
日付 個人ID 出勤時間 退勤時間 工数 残業 日報原価金額
の中に原価計算させるため、以下のコードを作りました。
Private Sub 日報原価金額_Enter()
Select Case 作業分類ID
Case 1
If 残業 = 0 Then
[日報原価金額] = (Me![工数単価] * [工数]) + Me![現場手当]
Else
[日報原価金額] = (Me![工数単価] * [工数]) + ([残業] * Me![残業単価]) + Me![現場手当]
End If
Case 2
If 残業 = 0 Then
[日報原価金額] = (Me![工数単価] * [工数])
Else
[日報原価金額] = (Me![工数単価] * [工数]) + ([残業] * Me![残業単価])
End If
Case 3
If 残業 = 0 Then
[日報原価金額] = (Me![工数単価] * [工数]) + Me![営業出張]
Else
[日報原価金額] = (Me![工数単価] * [工数]) + ([残業] * Me![残業単価]) + Me![営業出張]
End If
Case 4
If 残業 = 0 Then
[日報原価金額] = (Me![工数単価] * [工数])
Else
[日報原価金額] = (Me![工数単価] * [工数]) + ([残業] * Me![残業単価])
End If
Case 5
If 残業 = 0 Then
[日報原価金額] = (Me![工数単価] * [工数]) + Me![現場出張]
Else
[日報原価金額] = (Me![工数単価] * [工数]) + ([残業] * Me![残業単価]) + Me![現場出張]
End If
End Select
End Sub
工数単価、残業単価、現場出張、営業出張、現場手当はすべてクエリで計算させます。
クエリでは
日付の最大 個人ID 単価 工数単価 残業単価 現場出張 営業出張 現場手当
日付は最大
後はすべてグループ化です。
クエリの元は給与情報というテーブルがあります。
日付 個人ID 原価
社員の原価がアップする時にこのテーブルを入力していきます。
社員の単価が上がる時に日報原価金額に古いデーターままで計算されてしまいます。
ここでどうすれば、最新データーを取得できるか全然わからないです。
それと、以前の単価はそのままに変更されないことが大事です。
つまり、給与情報テーブルの日付≧日報テーブルの日付ならレコードのデーターを取得し、単価計算させます。
コードは全部自分で書きましたので見たら、すっごく素人だとすぐわかると思いますので以上の問題の解決方法はどうしても見つからなくて、困っています。
助言を頂くと助かります。
よろしくお願い致します。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- 人事・法務・広報 4月からの残業60時間以上の割増の計算式 2 2023/03/14 14:44
- 労働相談 有給休暇使用時の賃金の計算方法について 5 2022/04/04 00:02
- 経済 日本人が奴隷労働者になる日 国税庁の『民間給与実態統計調査』によると、2021年の平均給与は443万 9 2023/01/04 11:31
- 労働相談 奴隷扱いしても、従業員が何も言わないからって 調子に乗っている 会社経営家族、間抜けすぎるその後 ● 3 2022/07/08 09:38
- 労働相談 ① ・契約社員。業務委託で勤務。 ・時給1180円。毎年1-20円程のベースアップあり。 ・週5の7 1 2022/04/08 21:41
- 転職 転職活動中で2社内定があり迷っています。皆様ならAとBどちらの方が良いと思いますか?理由もお願いしま 1 2023/02/06 12:20
- 求人情報・採用情報 どれくらいの応募で難易度でしょうか。 4 2023/08/07 22:14
- 転職 現在転職活動中で2社候補があるのですが どちらに行くかもしくは現職に残るか迷っていて 参考までに皆様 2 2022/09/29 19:22
- 転職 転職活動中 会社選びで迷っています 3 2022/09/05 06:10
- 所得・給料・お小遣い 産休に入る月の給与が思ったより少ない。計算は合ってますでしょうか? 当方、正社員で働いております。5 3 2023/06/03 19:17
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ACCESSでVBAから選択クエリの抽...
-
クエリ実行結果0件の場合のフ...
-
ACCESS2003のグループ化のエラ...
-
クエリーの結果をフォームに表...
-
ACCESSで、EXCELのような、sumi...
-
AccessでIDを入力したら他の項...
-
AccessのフォームをExcelに出力
-
Accessクエリの抽出条件にフォ...
-
ACCESS フォームで抽出したデー...
-
ACCESS2007 マクロ クエリのパ...
-
VarChar型をINT型に変換するには
-
ACCESSあいまい検索から入力まで
-
ACCESSで、フォームで抽出した...
-
Access 抽出したデーターの詳細...
-
Accessでフォームに自動入力し...
-
エクセルで、抽出したデータだ...
-
前のレコードの値を自動で入れたい
-
Access サブフォームでの選択行...
-
ACCESSのクエリー抽出条件にIIF...
-
access別のテーブルを参照して...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ACCESSでVBAから選択クエリの抽...
-
AccessでIDを入力したら他の項...
-
ACCESSで、EXCELのような、sumi...
-
クエリ実行結果0件の場合のフ...
-
ACCESS2007 マクロ クエリのパ...
-
Accessクエリの抽出条件にフォ...
-
access クエリでIIF文で抽出条...
-
ACCESSで、フォームで抽出した...
-
サブフォームを利用したクエリ...
-
ACCESS フォームで抽出したデー...
-
ADOレコードセットのコピー
-
ACCESS クエリのデザインビュ...
-
ACCESS2003のグループ化のエラ...
-
VarChar型をINT型に変換するには
-
アクセスのフォームに連番を表...
-
AccessのフォームをExcelに出力
-
クエリーの結果をフォームに表...
-
AccessでログインIDを抽出条件...
-
Accessのパラメータクエリ作成...
-
Access 2段階のクエリの作り方
おすすめ情報