いつもお世話になっております。
OS:Windows 7
Access 2007
現在Access で日報管理を作成しています。
弊社では職務と職位で給料段階が違います。
それで以下のようにテーブルが作っております。
職務テーブル
職務ID 職務名称
1 研修生
2 職人
3 リーダー
給与情報テーブル
職務ID 職位 基本給 手当 月給 日給
それぞれ職務に対して職位は3段階があります。それぞれに基本給などが変わっていきます。
以上の二つテーブルから社員の給与明細のフォームを作成しています。
日付 社員ID 社員名 職務 職位 月給 日給
ここで教えていただきたいのは職務と職位を入力すると月給と日給は自動的表示することです。
よろしくお願いします。
No.1ベストアンサー
- 回答日時:
>以上の二つテーブルから社員の給与明細のフォームを作成しています。
>日付 社員ID 社員名 職務 職位 月給 日給
この明細フォームのレコードソースは二つのテーブルだけでは
無いと思いますが、また、給与明細のフォームでの職務、職位が
テキスト型なのか、あるいは数値型なのかまったくわからない
のでわからないままコードを作成すると当然ながらあちこちで
エラーが発生します。あらかじめそういう情報、あるいは
給与明細フォームで、職務は単純なテキストボックスか、あるいは
コンボボックスか、同様に職位に関しても事前に情報が提供されて
いれば回答、補足のやり取りが少なくてすみます。
そういうことは棚上げにして、以下に
方法を示しておきます。給与明細のフォームでのイベントで
二つの方法を示しておきます。(1)、(2)のどちらでも結果は
同じです。
なお、(1)、(2)ともにデータの型の違いにより三つほど
例を入れておきました。一応、給与明細のフォームの
職務、職位はテキストボックスで手入力するものとしています。
準備:
クエリの作成
Q給与情報という名前でクエリを作成します。
Q給与情報
SELECT 職務テーブル.職務名称, 給与情報テーブル.職務ID, 給与情報テーブル.職位, 給与情報テーブル.基本給, 給与情報テーブル.手当, 給与情報テーブル.月給, 給与情報テーブル.日給
FROM 職務テーブル INNER JOIN 給与情報テーブル ON 職務テーブル.職務ID = 給与情報テーブル.職務ID;
給与明細のフォームでのイベント:
月給フィールドフォーカス取得時と
職位更新後処理のイベントの二つを
表示しておきます。どちらかで
結構です。
(1)
Private Sub 月給_Enter()
If Not IsNull(Me![職務]) Then
'職務、職位が数値型の場合
'Me![月給] = DLookup("月給", "Q給与情報", "[職務名称]=" & Me![職務] & " And [職位]=" & Me![職位])
'職務が数値型、職位がテキスト型の場合
'Me![月給] = DLookup("月給", "Q給与情報", "職務名称=" & Me!職務 & " And 職位='" & Me![職位] & "'")
'職務、職位がテキスト型の場合
Me![月給] = DLookup("月給", "Q給与情報", "職務名称='" & Me!職務 & "' And 職位='" & Me![職位] & "'")
End If
End Sub
(2)
Private Sub 職位_AfterUpdate()
If Not IsNull(Me![職務]) Then
'職務、職位が数値型の場合
'Me![月給] = DLookup("月給", "Q給与情報", "[職務名称]=" & Me![職務] & " And [職位]=" & Me![職位])
'職務が数値型、職位がテキスト型の場合
'Me![月給] = DLookup("月給", "Q給与情報", "職務名称=" & Me!職務 & " And 職位='" & Me![職位] & "'")
'職務、職位がテキスト型の場合
Me![月給] = DLookup("月給", "Q給与情報", "職務名称='" & Me!職務 & "' And 職位='" & Me![職位] & "'")
End If
End Sub
間違い、勘違い、分からないことがあれば補足してください。
No.2
- 回答日時:
No1です。
回答に抜けているところがありました。
給与明細のフォームのレコードソースは質問の、
>以上の二つテーブルから社員の給与明細のフォームを
>作成しています。
ではなく、別個に
日付 社員ID 社員名 職務 職位 月給 日給
で、給与明細テーブルというもの作って回答しています。
結果は多分同じだと思いますが、一応念のために。
理由は、No1でも説明しましたが、
>以上の二つテーブルから社員の給与明細のフォームを
>作成しています。
では、給与明細のフォームのフィールドが足りないからです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- 会社・職場 給与テーブルがないのは普通のことでしょうか? 3 2022/05/09 18:05
- 求人情報・採用情報 ■おすすめポイント: ①人気の小規模園! ②月給20万超え!賞与4.4か月と高給与! または18時ま 1 2022/06/09 10:30
- 事務・総務 求人についてお聞きしたいです。 6 2022/05/04 18:24
- 求人情報・採用情報 転職すべきか残るべきかアドバイスください 5 2023/01/06 15:37
- 中途・キャリア 契約社員で在職中ですが、正社員目指して転職活動中です。 20代半ばの男です。 2社から内定を頂きまし 5 2022/04/29 13:39
- 転職 現在転職活動中で2社候補があるのですが どちらに行くかもしくは現職に残るか迷っていて 参考までに皆様 2 2022/09/29 19:22
- 労働相談 ① ・契約社員。業務委託で勤務。 ・時給1180円。毎年1-20円程のベースアップあり。 ・週5の7 1 2022/04/08 21:41
- 退職・失業・リストラ 給与等の条件変更について。 育児休業明け今月4月から現場復帰(正社員)しております。 2月末に4月以 1 2023/04/06 20:58
- 会社・職場 転職、履歴書、etc 私8年務めた会社を収入upの為に辞め 転職したのですが… 新たな職場2ヶ月間で 5 2022/05/31 15:16
- 転職 この求人は、良い求人でしょうか? 6 2023/07/17 20:01
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Accessでテーブル名やクエリ名...
-
ACCESSに同時アクセス(編集)を...
-
フォームの計算がテーブルに反...
-
ACCESS;フォーマットの...
-
アクセスで消し込みがしたい
-
Accessでvlookupみたいなことは...
-
ツリー構造をRDBで表現するには?
-
Accessの追加クエリで既存のテ...
-
ACCESSで同じテーブルに...
-
access テーブル内のレコード...
-
Accessクエリでの、LIKE条件
-
3つの表を1つに縦に連結する
-
時間の足し算
-
翌営業日までの日数をSQLで求め...
-
テーブル作成クエリで主キーを設定
-
アクセスのデータをエクセルに...
-
アクセスのテーブルをくっつけ...
-
SQL構文について教えてください
-
Accessでテーブルにパスワード...
-
MS Access からメールを送るには
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Accessでテーブル名やクエリ名...
-
ACCESSに同時アクセス(編集)を...
-
Accessでvlookupみたいなことは...
-
Accessでテーブルからテーブル...
-
Accessクエリでの、LIKE条件
-
Accessレコードの追加や変更が...
-
access テーブル内のレコード...
-
3つの表を1つに縦に連結する
-
SQLで日付を条件に削除したい
-
Accessの追加クエリで既存のテ...
-
SQLで条件指定結合をしたいがNU...
-
デザインビューで、連結式 を...
-
ツリー構造をRDBで表現するには?
-
ACCESSで指定されたテーブルか...
-
リンクテーブルを CopyObject ...
-
2つのテーブルを比較して一致し...
-
時間の足し算
-
ODBCで接続するとDBに変更/追加...
-
パススルークエリをテーブル作...
-
INSERT時にデータ登録とmaxの発...
おすすめ情報