カテゴリー別アーカイブ: Access(アクセス)

Accessで給与計算21~給与計算結果を保存するADOのコード

給与計算クエリの計算結果を、給与明細控えテーブルには
ADOを使って移します。

今回のサンプルファイルです。

最初に給与計算クエリに、給与明細テーブルの「ID」をフィールドに
追加します。
続きを読む

Accessで給与計算20~給与計算結果を保存する

給与計算が終わったら、それを保存しておく必要があります。

一応給与明細テーブルにはデータは残りますが、これには致命的な
欠点があります。

それは給与明細テーブルと給与計算クエリで計算した数値は動いて
しまうということです。

特に社会保険料については、毎年改定されるので、例えば
厚生年金保険料率表を変更すると、過去の社会保険料も全て変更され
てしまいます。
続きを読む

Accessで給与計算19~給与計算フォームを開く

設定漏れがあったので、少し戻ります。

給与計算クエリに、支給日をフィールドに追加します。
2612241
作成タブの既存のフィールドの追加をクリックし、支給日を給与計算フォームに追加します。
2612242
支給日は表示されなくてもいいので、可視プロパティを「いいえ」にします。
2612243

それではフォーム1から給与計算フォームを開きます。
フォーム1のコマンドボタンのVBAコードの最後の行の前に、次のコードを追加します。
Set cnn1 = Nothing
DoCmd.OpenForm “給与計算”, , , “支給日=#” & Me!テキスト0 & “#”
End Sub
太字が追加したコードです。
支給日をテキスト0(フォーム1のテキストボックスの値)のデータを選択してフォームを
開きます。日付の指定の仕方は若干独特ですが、数値型に加え「#」で囲むと覚えて下さい。
データ型によって若干コードが違いますが、これは習うより覚えた方が理解が早いと思います。

実行結果です。
2612244
フォーム1でテキストボックスに入力された日付で、ADOでデータが新たに追加され、
その追加されたデータを抽出してフォームに表示されました。

=============================
今日はクリスマスイブ。といっても仕事でバタバタ。
最後に寄ったお客さんは、昨日クリスマスは済ませたとのこと。
なるほど!来年はそうしようと思った慌ただしいクリスマスイブでした。

メルマガを発行します。
ご興味がある方は、メルマガ発行します!
からメールアドレスの登録をお願いします。

本日も最後までお読み頂きありがとうございました。

Accessで給与計算18~給与計算フォームの作成

給与計算クエリが完成したら、次はフォームを作ります。
作り方はウィザードを使います。
2612211テーブル/クエリで、給与計算を選択し、
選択したフィールドには、社員CD,氏名、基本給、通勤手当、その他手当1課税、その他手当2不課税
健康保険料、年金保険料、雇用保険料、社保合計、源泉、住民税、差引支給額
です。
続きを読む

AccessVBAの基本1

Accessでもマクロが使えます。

マクロというと、Excelと同じで
①動作を記録させるマクロ

②コードを自分で入力するVBA
の二つのマクロ機能が備わっています。

Excelの場合、VBAが殆どでマクロはポチポチつかう程度ですが、
Accessの場合は、VBAが100%でマクロは全く使いません。
続きを読む

NASを使ってAccessファイルをマルチアクセスできるか試してみた

NAS(ネットワーク対応HDD)を使ってAccessが共有できるかどうか、
ずっと考えていましたが、考えていても仕方がないという結論に至り、
購入し試してみました。

結果は、
同じネットワークであれば、複数のユーザーで同じAccessファイルに
アクセス&データ入力更新ができます。

これを更に広げて、
インターネット経由でNASにアクセスした場合は、残念ながら
複数ユーザーでのAccessファイルのアクセス&データ入力更新は
できませんでした。

理由は分かりませんが、インターネット経由でフォルダを開いて
Accessファイルを開こうとすると、ダウンロードが始まります。
この時点でアウトですね。
ネット経由でNASにアクセスした場合、NASのデータを直接触るのでは
なく、AccessファイルをPCにダウンロードして開く形になってしまいます。
同じファイルが二つ存在することが確定しました。

誰もAccessファイルを使っておらず、自分だけであれば、ダウンロード
したファイルを再度元のフォルダに戻せば最新のファイルとなりますが、
その間、他のユーザーはアクセスできず、仮に誰かがアクセスしてデータを
更新しても、ダウンロードしたファイルをアップデートしてしまうと
更新した内容が無に帰してしまいます。

こんな実験結果となりました。

正直NAS買い損してしまいました。

残念です。

何かいい情報があれば教えて下さい。m(..)m

Accessで給与計算16~ADOを使って給与明細データの追加②

前回は給与明細のデータだけを追加しましたが、折角なので追加と同時に基本給や通勤手当
住民税など、従業員テーブルに登録されているデータで、給与計算でも使うデータを
従業員情報から給与明細テーブルに移します。

2612171
続きを読む