accessのパスワードについて

質問

access97を使っています。accessのセキュリテイについてですが、管理者のパスワードではいるとこのテーブルは変更可、ユーザーのパスワードではいると読み取り専用というふうにしたいのです。本をみて管理者を設定し上記のようにできるのですが、このような設定にするとアクセスに入る時パスワードを聞いてくるのです。私がしたいのはaccessのあるファイル（プログラム）のみこのような設定をしたいのです。
以前同じような質問をしたのですがうまくいきませんでしたので質問します。
アクセス超初心者です。よろしくお願いします。

回答No.1

laputart

一番簡単なのは
ツールからMDEの作成を実行して
ユーザーにはこのMDEファイルを使わせることです。
管理者以外は編集等が出来ないのでプログラムを
書き換えられないのです。
>accessのあるファイル（プログラム）のみ
とはフォームの事でしょうか？
その場合はそのフォームのモジュールに
以下の様にパスワード入力を設定するといいでしょう。
仮にフォーム名をABC、パスワードを11111とします。

------------------------------
Private Sub Form_Open(Cancel As Integer)
Dim PWD As String
PWD = InputBox("パスワード")
If PWD <> "11111" Then　
'パスワードが一致しない場合　この場合　
DoCmd.Close acForm, "ABC"
End If
'その他のジョブを実行
End Sub
----------------------------

補足

補足させてもらいます。”accessのあるファイル（プログラム）のみ
とはフォームの事でしょうか？ ”はファイル全体ということです。例えば管理者設定するとアクセスを開く時パスワードをきいてきます。アクセスをひらくときは普通に開けてアクセスのなかのたとえば伝票管理というファイルのみ（テーブル、クエリー、フォーム等全体の）を開く時のみパスワードを設定したいのです。単にパスワードをつけるのはできますが、例えば管理者のパスワードを1111と入力するとすべて変更可、ユーザーのパスワード2222では入力のみというふうにしたいのです。このような設定の方法は本をみてできるのですが、この設定をするとそのファイルは勿論うまくうごきますが、アクセスを開く時でもパスワードを聞いてくるのです。くどいようですが1つのファイルのみその設定をしたいのです。
よろしくおねがいします