• ベストアンサー

エクセル終了時に、シートに保護をかけたい

エクセル2007にシートが３枚あります。[入力１][入力２][入力３] これを、どのシートで終了しても、全てのシートに保護（ユーザーに許可する操作は全てチェックをはずす）が掛かるようにしたいのですがうまくできません。 （どうしても終了時に開いていたシートしかマクロが実行されません） ご教示いただけないでしょうか。よろしくお願いします。

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

  • ベストアンサー
  • jiji0721
  • ベストアンサー率50% (8/16)
回答No.1

Dim W As Worksheet For Each W In Worksheets W.Protect DrawingObjects:=True, CONTENTS:=True, Scenarios:=True W.EnableSelection = xlNoSelection Next W みたいな感じでいけると思います。

SAZA2010
質問者

お礼

お礼が遅くなり申し訳ありません。 ありがとうございます！ 解決しました！！

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. オフィス系ソフト

関連するQ&A

  • エクセル2007の、シートの保護について

    エクセル2007の、シートの保護について シートの保護の際、「このシートのすべてのユーザーに許可する操作」にて ・ロックされていないセルの選択 ・セルの書式設定 にチェックを入れたのですが、ブックを保存して閉じて、再度開くと ・セルの書式設定 のみチェックの入っていない状態で開かれます。 シートは保護された状態なため、いちいち保護を解除してチェックを入れ直し、 再度保護するのが面倒なのですが、ブックを閉じても 「このシートのすべてのユーザーに許可する操作」の設定が変わらない方法はあるのでしょうか？ どうぞ、よろしくおねがいいたします。

  • シートの保護でデータ追加が出来ない　Excel

    表の項目で関数を入れているなど、データ入力以外さわらせたくない項目があるため、 シートの保護を設定するとデータの追加（新しいレコードの追加）が出来なくなりました。 （表をリストに変換しています。またセルの設定で「ロック」は外しています） またマクロも実行時にエラーになります。 「シートの保護」の「～許可する操作」の設定をいろい変えてみたのですがうまくいきません。 リストへレコード追加やマクロ実行時が出来て、ユーザーには関係のない項目を触らせなくする方法は無いでしょうか。 エクセル２００３です。

  • シートを保護しても入力規則を使えるようにしたい

    エクセル初心者でエクセル２００２を使っています。シートを保護した状態でも入力規則のドロップダウンリストに値を追加するなどの操作をしたいのですが、入力規則が使えなくなります。（「データ」→入力規則が選択できない） 「ツール」→「保護」→「シート」の保護を選択し、「このシートのすべてのユーザーに許可する操作」のすべての項目にチェックを付けても入力規則を操作することができませんでした。 シートを保護した状態で入力規則を使うことはできないのでしょうか？恐れ入りますが回答よろしくお願いします。

  • Excel シートの保護機能について

    Excel2003を使用しています。 シートの保護機能について、教えてください。 ユーザによるセル内の入力・編集・削除の作業は許可させたいのですが、 行の追加・削除は許可させないようにしたいと思っています。 「ツール」の「保護」機能を利用すると、行の追加・削除の制御は出来るのですが、 セル内への入力・編集もできなくなってしまいました。 制御できないことはないと思うのですが、可能でしょうか？ マクロで作成したExcelファイルがあり、定形の形から崩れてしまうとプログラムが おかしくなってしまう為、上記のような制御を行いたいと思っております。 ユーザには、入力・編集作業＋マクロの実行のみ、行わせたいと思っています。 よろしくお願いいたします。

  • EXCEL保護シートで、Σを使いたい。

    EXCEL2002のシートに保護をかけた時に、Σがグレーアウトして表示されません。 表示させるには、どのようにすればよいでしょうか？ Σを入力するセルは、ロックをかけておらず、タテ（列）の合計を計算させます。 保護されたシートのすべてのユーザーに許可する操作は 「ロックされたセル範囲の選択」「ロックされていないセル範囲の選択」「セルの書式設定」「列の書式設定」「行の書式設定」「行の挿入」「行の削除」「並べ替え」にチェックをいれています。

  • 「シートの保護」というよりは「書式の保護」？

    お世話になります。 今、単なる住所録のようなシートで 多少の入力規則や条件付き書式や 表示形式を入れています。 そのシートを複数の人に配布して自分がまとめるのですが 「入力はして欲しいけど（文字、数字）書式や表示形式はイジって欲しくない」という時は 何を使えば良いのでしょうか？ 「シートの保護」の中の“このシートのすべてのユーザーに許可する操作”で「セルの書式設定」のみチェックをはずし、 シートに保護を掛けたら入力すら出来なくなってしまいますので 「入力はして欲しいが その他の事（書式や表示形式変更）は出来ないように」したいです。 宜しくお願い致します。

  • エクセル2010のシート保護マクロについて

    すべてのシートを保護してくれるマクロを教えてほしいのですが、機能として 「ロックされていないセル範囲の選択」と「セルの書式設定」の二つの機能を許可したものを教えてください。また、逆にすべてのシートの保護を解除するマクロもお願いします。 エクセル初心者のため、見当はずれなことを聞いていたら申し訳ありませんが、いくら探しても上記のようなものを探すことができず、、、。シートが80ほどあるもので、困り果てています。 よろしくお願いします。

  • シート保護してても並び替えをしたい。

    添付画像を載せましたが、残高には関数があり、その列だけはシート保護をかけてあります。 保護のかけ方は、Ａ～Ｄの１行目も含め最下行までです。 あとのＡ～Ｄ列は入力できるのですが、「このシートのすべてのユーザーに許可する操作」 で、「並び替え」にチェックしてあるのですが、A1の“年月日”にセルを置いて<昇順で並び替え>をやるのですが、保護がかかっているため並び替えできません。 VBAではなく一般操作の範囲でなんとか並び替えができるようにならないでしょうか。

  • Ｅｘｃｅｌのシートの保護について

    Excelのシートの保護について教えてください。 シートのセルごとに保護をかけました。 セルの書式設定→保護→ロックのチェックをつけて ツール→保護→シートの保護　というふうにしました。 セルの書式設定の保護のロックのチェックを 外したところは入力ができるようになり、 ロックのチェックをつけて保護をしたところには 入力しようとすると「変更しようとしているセルまたは・・・」と メッセージが出るようになると思うのですが、 一部のセルだけ入力しようとすると上記のメッセージが出て、 ＯＫをクリックしてもずっとメッセージが出続けて、 タスクマネージャで終了しないと作業できなくなってしまいます。 原因がわからず困っています。なにか設定が悪いのでしょうか？ 教えてください。よろしくお願いします。

  • エクセル　シートを保護してる時のセル結合

    エクセル２０１０を使用しています。 仕事の成果を一定の様式に記入してもらいます。書式、関数などを変更してもらいたくないのでシートに保護をかけました。 記入してもらうところだけセルのロックをはずし入力OKに設定しました。 しかし、シートの保護をかけるとロックをはずしててもセルの結合はできないんですね。なので、過去の質問からシートの保護がかかっていてもマクロですべての操作をしようできるというマクロ↓を参考にしてみました。 Sub seru() ActiveSheet.Protect UserInterFaceOnly:=True End Sub これと、セルを結合するマクロ↓を考えたのですが、どのように２つをくっつけたらいいのかがわかりません。 If TypeName(Selection)="Range"and Selection.Cells.Count>1 Then Selection.Merge ActiveSheet.Protect,AllowFormattingCells:=True End If 何かぬけているのかマクロを実行しても全く働いてくれません。 どうかよろしくです。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する