• 締切済み

マクロ 列のロック解除について

mar00の回答

  • mar00
  • ベストアンサー率36% (158/430)
回答No.2

質問の内容ではどの位置に列を追加したいのかがわからないので 追加したい位置の列を指定してからになりますが Sub Macro1() ActiveSheet.Unprotect Selection.Insert Shift:=xlToRight Cells.Locked = True Selection.Locked = False ActiveSheet.Protect End Sub

関連するQ&A

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

    教えてください。 部下に色々と触られたくないので入力する項目以外はセルのロックとシートの保護をしました。 しかし追加でロックをしたい場合には一度シートの保護の解除するとまた最初からになります。 複雑にロックさせたのですがすでにロックした状態から追加することはできないのでしょうか? 教えてください。 宜しくお願い致します。

  • EXCEL2003でロックされたセルを含む行の削除、追加を許可したい

    EXCEL2003で、以下の表を作りました。 ・200行50列。50列うち40列は数式。リストになっている。 ・数式でない10列のみ、ロックをはずし、シートの保護をかけた。 この表で、保護したまま、以下の操作を許可したいのですが、可能でしょうか? ・ロックされたセルを含む、行の削除 ・行の追加時に、ロックされた列に数式の自動コピー  (リストになっているので、保護解除状態ではコピーされます) 数式をいじられたくないだけなので、行の追加削除は自由にさせたいのです。 EXCELのバージョンアップをしたら可能になったりしますでしょうか? ご回答、よろしくお願い致します。

  • EXCEL VBA 特定セルの保護解除したい

    お世話になります。田中ともうします。 EXCELのあるシートを一度全て保護して、特定セルの解除をVBAで実現したいのです。 現在、上記処理を毎回手動でやっており、手間もそうですが間違いも多くなり困っています。 イメージとしましては[保護]というボタンをクリックしたら上記処理がVBAで実行されるようにしたいのです。どなたかご教授いただけませんでしょうか。 以下処理の順番イメージです。 ■全てのセルをロック ■保護解除したいセル その(1) 行は決まっていますが列(XX)は可変です。 XX7行目に[調整]という文字がありますのでそのXX列の、XX8行目、XX10行目、XX14行目、XX16行目、XX18行目、XX28行目が保護解除したいセルになります。 ■保護解除したいセル その(2) D20を起点にして、F20、H20、J20・・と2列ずつ右に移動して保護解除したいのです。 ある程度右いにいくと"E"という文字にあるので、この"E"にぶつかるまで上記のように2列ずつ解除したいのです。 ■保護解除したいセル その(3) D24を起点にして、F24、H24、J24・・と2列ずつ解除したいのです。 条件はその(2)と同じです。 これを毎回手でやっているため結構大変で困っています。 どなたかお助けいただけませんでしょうか? よろしくお願い致します。 EXCEL2013

  • シートの保護を作成者以外が解除できないようにしたいです。

    シートの保護を作成者以外が解除できないようにしたいです。 あるエクセルで作った一覧表のひな型を他社に渡して記入してもらうのですが、こちらで入力した顧客番号を誤っていじられないように、数値入力用セルだけ保護の解除を書式設定から行い、シートの保護を選択してメール添付で送っています。 しかし、シート保護の解除は、シートタブを右クリックすれば簡単にできますよね。 先方が誤ってシート保護を解除した上に、顧客番号を誤っていじらないとも限らないので、結局戻ってきたデータの顧客データの正確性が完全に担保されず困っています。 また、シート内の特定セルだけ記入可能にするには、やはり記入可能にしたいセルの書式設定で保護からロックのチェックボックスを外し、その後シート全体を保護するしかないのでしょうか。

  • シートの保護のあとセルの列、幅を動かせるようにしたい

    EXCELマクロでシートの保護はするがセルの行、列の幅を動かせるにしたいです。 シート1,2,3があり、シート2,3のデータをシート1に集約する処理を 行っています。 シート1,2,3は事前にシートの保護を設定し、シートの保護の設定で、ロックされたセル範囲の選択、セル書式設定、列の書式設定、行の書式設定は許可しています。 シート1にシート2,3のデータを設定する時にActiveSheet.Unprotect Password:="password"でシートの保護を解除し、設定後にActiveSheet.Protect Password:="password"を再度保護しています。 空の状態のシート1はセルの行、幅を動かすことはできるのですが、上記のシートの保護を解除し、データ設定後、ActiveSheet.Protect Passwordコマンドで保護するとシート1のセルの行、幅を動かすことができなくなります。 シートの保護設定のやり方があるのでしょうか。 ご指導のほど、よろしくお願いいたします。

  • 計算式を保護したシートの並び替えについて @excel2007

    あちこちに計算式が入ってるシートがあり、その計算式が保護された状態で、行を並べ替えたくていろいろ試してるのですが、どうしてもできません。どなたかアドバイスお願いいたします。現在の状態は、 シート全体を選択してから「セルの書式設定」「保護」で「ロック」のチェックをはずし、 F5キー「セル選択」で数式にチェックしてOK→「セルの書式設定」「保護」で「ロック」にチェック「表示しない」にチェック、 「書式」「シートの保護」を掛ける。※ ※このとき、最初にシートの保護をかけたときは「ロックされたセル範囲の選択」「ロックされていないセル範囲の選択」だけにチェックをいれてOKしたのですが、後に、行の並べ替えをする必要がでてきたため、いったん、 「校閲」→「シート保護の解除」で保護解除し、あらためて「シートの保護」→「ロックされたセル範囲の選択」「ロックされていないセル範囲の選択」「「並べ替え」にチェックをいれてOKしました。 ただ、これで並べ替えを実行しようと「データ」→「並べ替え」すると、エラーメッセージ 「変更しようとしているセルまたは・・・保護されているため読み取り専用となっています。・・・シートの保護解除をクリックして・・・」がでます。 (注)このシートについて、保護は計算式だけでいいのですが、並べ替えは、計算式の入ってる列も、計算式が入ってない列も行う場合があります。 また、マクロについては無知なので、ご了承ください。 よろしくお願いします。

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

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

  • VBAによるセルのロック解除

    VBAによるセルのロックの有効/無効の設定方法が解らず困っております。 通常excelのシートは全てのセルにロックが有効状態がデフォルトだと思いますが、コレを全て無効にしたいと思っております。 (右クリック→セルの書式設定→保護タグ→ロックのチェックを外す コレをVBAで全セルに向けてやりたいという事です) お解りになる方ご指南よろしくお願い致します。

  • セルにロックをかけたい。

    セルにロックをかけたい。 先日までエクセル2000を使用していました。 式の入っているセルを他人に変更されたくないので、いつも下記のようなやり方を 行っていました。 一旦シート全体を選択して「右クリック」→「セルの書式設定」→「保護タブ」で 「ロック」のチェックを外す。 「編集」→「ジャンプ」→「セル選択」→「数式」を選択、数式が入力されている セルが全て選択され、その選択されたセルに対して「右クリック」→「セルの書式設定」 →「保護タブ」で「ロック」のチェックをつける。 「ツール」→「保護」→「シートの保護」。 先日よりPCが変わってエクセルも2007になりました。 上の作業が上手く出来なくて苦労しています。 結果的に同じ事が出来ればよいので、やり方が変わっても構いません。 どなたか教えて頂けると幸いです。 それと、追加なんですが、 上の場合、式の入っているセルだけなんですが、式の入ってセル+任意のセル(このセルには 数字が入っています)にもロックをかけたいのですが、どのようにすればよいのか合わせて ご教授頂けると幸いです。

  • エクセルの保護 列ができるもの、出来ないものが

    A列に社名 B列からG列まで(6月から11月)データー入力の表を作成し、6月から8月まで保護をして9月から11月まで入力できるようにしたいのです。 入力したいところ(9月から11月)を選択し、書式、セルのの書式設定、保護、ロックをはずし(ロックをはずす前はvにチェック(正常?)とか、たまには四角のグリーンのときもあります。) ツールの保護、シートの保護 シートとロックされたセルの内容を保護するにチェックを入れ、OKをクリックしてもA列の社名とB列の6月はロックがかかりますが他の列はロックがかかりません。何か手順を間違えているのでしょうか、シートの設定があるのでしょうか