【Access】誤入力などの人的ミス防止対策

マイクロソフトアクセス（以下Access）というデータベースを使っていて、テーブルから、フォームウィザードで作成した入力画面などだと、ちょっとした人的ミスで、データを書き換えてしまったり、消してしまったりする場合があります。

そこで、ちょっとしたロック機能や、ワンクッション入れる操作を入れることで入力ミス防止につながります。

編集許可ボタンを設置する

一つの人的ミスの防止策として、フォーム自体の「更新の許可」を「いいえ」にしておき、編集するときだけ、編集許可ボタンを押して更新を可能にする方法がある。

これならば、間違って別のキーを押してもデータは更新されたり消されたりするリスクが減ります。

（１）フォームをデザインモードで開いたら、左上の点をクリックして選択

（２）プロパティシートの「更新の許可」を「いいえ」に変更

上記の手動設定も今回は、VBAにした方が簡単なのでVBAに自動切り替えにしました。

※（１）（２）の設定はしなくてもOKです。

フォームをデザインモードにして、ボタンの「更新許可」を設置します。

プロパティシートの「クリック時」にて、コードビルダーを起動して下記のように設定します。

※サブフォームなどがある場合は、コメントアウトしている部分を使ってください。

その他、フォームのプロパティシートから、

●読み込み時

●レコード移動時

の場所から、コードビルダーを起動してVBAの編集エリアに行きます。

上記●２つのVBAと、●２つのSubプログラムを追加してください。

●読み込み時

●レコード移動時

●Subプログラム（フォーム編集ロック時）

●Subプログラム（編集許可時）

この設定をすることで、「編集モード」ボタンを押さない限り、編集はできなくなり、人的ミスが減ります。また、レコードを移動する時も自動で編集ロックがかかるようになっています。

他にも方法ある誤入力対策

Accessは、市販のマニュアルには無いテクニックがあり過ぎて本当に探すのに大変な面がありますが、方法は１つだけではないので、自分の経験で蓄積していけば良いかと考えます。

今回の様に、フォームにロックをかけて編集できなくなくするという方法もありますが、複数人でデータベースを共有して使用する場合は、閲覧するフォーム自体に直接テーブルのデータを使わないケースの方が多いです。

つまり、入力画面と検索画面が分かれており、一旦入力されたデータを見る場合は、検索画面でしか見れないという事になり、検索画面では、直接テーブルのデータを表示している訳ではないので、更新するには、更新ボタンをクリックしない限り、保存されないという仕組みになります。

まだまだ、人的ミスを防ぐ方法はありますが、随時ブログにてしていきたいと思います。