• ベストアンサー

エクセル操作で質問です

社内に配布するエクセルデータがあります。 項目数が多いのでオートフィルタを使用したいですが、 同時に編集ができないようにロック(保護)をかけたいです。 ただロックをかけるとオートフィルタが使用できなくなります。 何かいい方法等はないでしょうか? 現在は「読み取り専用」で使用していますが、 できればもう少しかたい運用をしたいです。 エクセルのバージョンは2000です。 知恵をお貸しくださいませ。 よろしくお願いします

質問者が選んだベストアンサー

  • ベストアンサー
回答No.2

Excel2000の場合、VBAのマクロを使用する方法しかないようです。 ■シート保護時にオートフィルタを有効にする  新人にデータを壊されないようにする為には、非常に有効な解決方法です。  (でもバックアップが基本です。ファイルを上書きされたらおしまいですから。) Sub Auto_Open()   Worksheets("Sheet1").EnableAutoFilter = True   Worksheets("Sheet1").Protect UserInterfaceOnly:=True End Sub  一度ファイルを閉じて、再度開くことが必要です。  Auto_Openはブックを開くとそのプログラムが自動的に実行されます。  ブックを閉じるとEnableAutoFilterは、Falseに戻るのでAuto_OpenでTrueに設定して解決しています。  また、UserInterfaceOnly:=Trueで、シート保護が有効時でもVBAでの操作を有効にしています。  Excel2002からは、基本操作で解決できるようになったようです。  [XL2002] ワークシートの保護オプションの概要  http://support.microsoft.com/default.aspx?scid=kb;ja;289269#XSLT...

参考URL:
http://jp5.txt-nifty.com/exhogo.htm#hogo-17
AQ-kino
質問者

お礼

ありがとうございます! 助かりました。 ただ毎回開くたびにツールからマクロ実行が必要なようですね

その他の回答 (2)

回答No.3

保護指示をするときにオートフィルの使用を許可するのかしないのか 【ツール】⇒【保護】⇒【シートの保護】の後に出てくる詳細欄で指定してください。 デフォルトはオートフィルタもロックがかかってしまうのです。 そちらのチェックをして頂ければオートフィルタ使用可能になりますよ

AQ-kino
質問者

お礼

エクセルが2002以降ならそれでよかったみたいですね^^ ありがとうございます

  • mu2011
  • ベストアンサー率38% (1910/4994)
回答No.1

エクセルの原ファイルを回覧する事は、セキュリティ上、好ましくありませんが如何でしょうか。 回答になっていませんが、一旦、PDFに変換して配布する方法もご検討ください。

AQ-kino
質問者

お礼

確かにそうなんですが、今回はどうしても必要で^^; ありがとうございました

関連するQ&A