- ベストアンサー
シートの保護で困ってます。。。
複数のシートに「シートの保護」を一度に掛けたいのですが、どうすればよいでしょうか？？ １シートずつ選択して保護していくしか方法はないんでしょうか・・・ ご存知の方、お教えください。 よろしくお願いします。
- その他(ソフトウェア)
- 回答数2
- ありがとう数3
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
エクセル一般機能では複数シートに一括で保護をかけることはできないと思います。 VBA（マクロ）が必要になります。 (1)全てのシートに保護をかける場合 Sub 全シート保護() For st = 1 To Worksheets.Count Sheets(st).Protect Next End Sub (2)任意のシートを選択して保護をかける場合 Sub 選択シート保護() Set MYS = ActiveWindow.SelectedSheets For Each st In MYS st.Select st.Protect Next End Sub ※こちらは保護をかけたいシートを選択した状態で実行してください。 保護パスワードを入力する場合は（例：12345） st.Protect → st.Protect "12345" となります。 一括で保護を解除する場合は st.Protect → st.Unprotect となります。
その他の回答 (1)
- arayotto
- ベストアンサー率21% (3/14)
エクセルについての質問ということですよね？ エクセル2000の場合は、ツール→保護→ブックの保護でブック全体が保護されます。 ブックの中のいくつかのシートならShiftキー（もしくはCtrlキー）を押しながら保護したいsheetをクリックして選択し、ツール→保護→シートの保護で出来ると思います。
関連するQ&A
- 複数シートの保護・解除
Excelで、複数のシートの保護・解除を一度に行いたいのですが、 方法はないのでしょうか？ 単純に複数シートを選択した状態で、 メニューを開いても、シート保護・解除のメニューが灰色になって 使えません。 単一シートでの保護・解除の仕方は分かります。 裏技をご存知の方、是非教えてください！
- ベストアンサー
- オフィス系ソフト
- EXCELで複数のシートを一度に「シートの保護」することはできますか？
今は2003を使っています。 よく１年分のデータを集計します。 １月から１２月までのシートを作り、１３枚目に１年の集計をする形です。 いったん「シートの保護」をしたら、（表自体を）修正するときには１２回保護の解除を行い、 終わったら１２回シートの保護をしなければならず、大変面倒です。 複数のシートを選択すると、「シートの保護」というところがグレーになり、選択できません。 検索すると、複数のシートの保護を一度に解除するというソフトは発見しましたが（それは2000対応とのことで、試してはいませんが）、 解除も保護も一度にできないものでしょうか？
- ベストアンサー
- オフィス系ソフト
- シートをまとめて保護・解除したい
エクセル９７、２０００を使っています。 エクセルもシートが多くなると、その保護と解除が面倒で困っています。 いちいちシートを選択して保護と解除をしなければなりません。 マクロなどを使わずに、全てのシートを一度に保護・解除する方法はないでしょうか。シートの中にも保護してるセルとそうでないセルがあるので ブックを保護するわけにもいきません。
- ベストアンサー
- オフィス系ソフト
- エクセルのシート保護について
こんにちは エクセルでシートが複数あります。 普段はいじらないように保護をかけてあります。（パスワードは設定していません） 同時に編集をしたいので、シートの保護を解除したり設定したりをしたいのですが、複数のシートを同時に設定・解除できる方法はありますか？ 普通にシートを複数選んでも保護をいじることができないのですが、何かいい方法があったら教えてください。
- ベストアンサー
- オフィス系ソフト
- エクセルシートの保護
お尋ねします。 複数のエクセルシートでひとつのブックを構成していますが、このブック全てに保護をかけたいのです。複数のシートは指定できないようなので、１シートずつ「シートの保護」をかけなければならないのでしょうか？シート数が多いだけに、ブックごと保護する方法がありそうなのですが分かりません。 ご教授ください。
- 締切済み
- Excel（エクセル）
- 保護シート
電話の外側にマジックで書いた文字が消えないように、保護シートを貼りました。 しかし、空気が入ってしまっていつも保護シートをなでないといけない感じなんです… でも貼り直しもできないしで困っています！！ 貼り直さずに空気を抜く(！？)というかキレイにする方法ご存知の方いませんか？
- ベストアンサー
- その他（スマートフォン・携帯・タブレット）
- エクセル シートの保護
はじめまして。エクセル2007を利用していますが、シートの保護について教えて頂ければと思います。あるエクセルファイルの中で複数シートの中のある一つのシートを隠し（隠す方法は分かるのですが）更にもう一度見せる段階でパスワードをかけて他人に見せないようにしたいと思っています。そのやり方を教えていただけますでしょうか。過去のログを調べましたがキーワードの設定が悪いのか、目的のものは見つかりませんでした。何卒宜しくお願い申し上げます。
- ベストアンサー
- オフィス系ソフト
- エクセルVBA シートの保護について
エクセルの「シートの保護」について教えてください。 特定のシートのみ、保護したいと思っています。 そのシートの一定の範囲には、入力のみを許可したいです。 というのも、他の範囲（保護したい範囲）には、数式やvbaが設定されており、むやみやたらに「切り取り」や「行や列の削除」をされると困るからです。 そこで、 入力を許可する範囲を選択 →セルの書式設定 →保護のロックを外す →シートの保護 →「ロックされていないセル範囲を選択」を選択 しました。 この状態でマクロを実行すると、エラー1004（保護されたシートに対してこのコマンドは使用できません）とエラーが出ました。 エラー箇所は以下のとおりです。 Intersect(Worksheets("sheet1").Range("C5").CurrentRegion, Worksheets("sheet1").Rows("5:65536"), Worksheets("sheet1").Columns("C:T")).Select （質問1） ロックを外し、その後にシートの保護をする際、「全範囲を選択してから」シートの保護を行うものなのでしょうか。 それともシートの保護をすれば、自動的に、ロックを解除した範囲以外（全範囲）で保護したことになるのでしょうか。 「全範囲を選択してから」シートの保護をすると、ロックを外したセルを選択しても、アクティブセルが罫線で囲われずどこを選んでいるのか分からなくなってしまったので。 もし、あえて全範囲を選択する必要がないなら、それでいこうと思っています。 （質問2） 上記エラーを解消するには、どうしたら良いのでしょうか。 全範囲を選択できないように保護していることが原因かと思い、全範囲について「シートの保護→ロックされたセル範囲の選択」を選んでもエラー解除できませんでした。 また、Intersect.Selectの一行上に「ThisWorkbook.Unprotect」と追加しても解除できませんでした。 ２つも質問して申し訳ありませんが、ご存知の方はご教授お願いします。 よろしくお願いします。
- 締切済み
- Excel（エクセル）
