エクセルのデータを保護するに際して・・・

質問

エクセル２０００で質問です。
現在６００行くらいのデータが有ります。
列の数は１０列程度です。
オートフィルを掛けて探しやすいようにしてあるのですが
他の人も見るので誤って数値や文字を上書きされないようにデータのすべてを
ロックを掛けたいのです。
が、しかしオートフィルとの重複は無理だと知りました。
計算式が入っているところはロックを掛けられますが、式が入っているのは
一部の列のみです。

フリーソフトを使用すれば可能では？という意見も過去ログで見ましたが
出来ればエクセル上で何らかの方法で条件を満たしたいと思っています。
検索がやりやすくてデータを保護する何かいい方法があればアドバイス下さい。

回答No.5

Wendy02 · ベストアンサー

こんばんは。Wendy02です。

「オートフィルタ」だとすれば、回答は、私が#2 で書いたものしかないと思っています。上位バージョンでは、シート保護のオプションで回避方法があるのですが、Excel2000 では、マクロによるものしか解決方法がありません。そういう方法は、あまり望まれない解決方法のようですが。

お礼

Wendy02さん
有難うございました。
再度チャレンジしたところ上手くいきました。
いつも本当に有難うございます。

回答No.4

Wendy02

choroq様へ　Wendy02です。

お忙しいとは思いますが、こちらのほうも、気になったまま、そのままになっているようです。「オートフィル」か「オートフィルタ」か、どちらかでしょうか、それをはっきりさせたほうがよいですね。

お礼

Wendy02様
この質問にも目を止めて頂いたのですね。
いつもの事ながら感謝致します。

「オートフィルタ」です。

訂正してお詫び致します。

回答No.3

k-f3

パスワードを正しく入力しないと書き込みができない。
ツール→保護→シートの保護→「シートとロックされたセルの内容を保護する」にチェックを入れる→パスワードの設定

回答No.2

Wendy02

こんばんは。

Excel2000　でも、ロックしたまま、オートフィルタ(×オートフィルではありませんね。)は可能です。ただ、そのオプションが、単に表に出ていないだけです。

マクロで可能です。

ThisWorkbookモジュールへの取り付け方

Alt　+　 F11 (Altを押しながらF11）を押すと、Visual Basic Editor 画面が出てきます。
左上側にプロジェクトエクスプローラの窓の中に、ThisWorkbook があったら、それをダブルクリックして、開けます。そして、以下のコードを貼り付けてください。

もし、窓が出ていないようでしたら、Ctrl + R を押すと通常左側に出てきます。

Alt　+　Q で、画面を閉じます。

'-------------------------------------------
Private Sub Workbook_Open()
　 With Me.Worksheets("Sheet1") 'Sheet1 に設定する場合
　　　.EnableAutoFilter = True
　　　.Protect Password:="PSW", UserInterFaceOnly:=True
　　　'パスワードを、「PSW」にしました。
　 End With
End Sub

'-------------------------------------------

保存して、再度、ブックを開くと、パスワードでロックされて、オートフィルタは使用できるようになっています。今回、Excel2000で、試験しています。

回答No.1

auw42s

ファイルを保存する時に、書き込む時にはパスワードが必要な設定をしたらどうでしょうか?

オートフィルをかけた状態で「名前をつけて保存」をします。
保存する場所などを選ぶ窓が出たら、右上のツールという中の「全般オプション」をクリックします。
すると保存オプションという窓が出ると思いますので、書き込みパスワードのみを入力して保存します。
保存したそのファイルをもう一度開こうとすると、書き込むためにはパスワードが必要になります。閲覧するだけなら、「読み取り専用」で開けば見ることは可能ですが上書き保存ができません。

こんな感じで応用してみるのはいかがでしょうか♪