• 締切済み

EXCELのVBAマクロについて

EXCELのVBAマクロで、プログラミングをしてシート保護を パスワードでロックするのですが、ウィンドウ枠の固定や解除までは、ロックできません。 ロックするには、どうしたらよいのでしょうか?

みんなの回答

回答No.1

ロックする方法はわかりませんがこういう方法もありますよ ---------------------------------------------------- メニューバーのウィンドウ枠固定又はウィンドウ枠固定の解除をメニューバーから非表示にしてシートを変更したら元に戻す Sub a() For Each i In CommandBars.ActiveMenuBar.Controls If (i.Caption = "ウィンドウ(&W)") Then For Each j In i.CommandBar.Controls If (j.Caption = "ウィンドウ枠の固定(&F)") Then j.Visible = False End If If (j.Caption = "ウィンドウ枠固定の解除(&F)") Then j.Visible = False End If Next j End If Next i End Sub Sub b() For Each i In CommandBars.ActiveMenuBar.Controls If (i.Caption = "ウィンドウ(&W)") Then For Each j In i.CommandBar.Controls If (j.Caption = "ウィンドウ枠の固定(&F)") Then j.Visible = True End If If (j.Caption = "ウィンドウ枠固定の解除(&F)") Then j.Visible = True End If Next j End If Next i End Sub Private Sub Worksheet_Activate() a End Sub Private Sub Worksheet_Deactivate() b End Sub ----------------------------------------------------- 意図しているものと違っていたらすみません

関連するQ&A

  • エクセル2000でのVBAについて

    エクセル2000のマクロで下記のことをやりたい。 保護がかかっているシートのあるセルに、オブジェクトの挿入したファイル を貼り付けたい。 あるセルの書式の保護のロックを解除しても貼り付けができない。 シートの保護を外さないとできないのでしょうか。 シートの保護を外さないでできる方法はありますか? あれば教えてください。                       以上

  • エクセルのマクロでパスワードについて教えてください。

    マクロの極初心者ですので、パスワードの解除の仕方について、優しくご教示頂けますと幸甚です。 オフィスは2007を使っています。 マクロの内容を他人に見られたくないので、 パスワードをかけようと思っています。 エクセルのツールバーのマクロの下の▼⇒マクロの表示⇒ステップ イン⇒ コードを記した画面のツールバーのツール⇒ VBAプロジェクトのプロパティー⇒保護のタブ⇒プロジェクトのロックにチェックマーク&パスワードを入力⇒OK を押し、エクセルをいったん閉じて再度開いたらステップインを押せなくなり、パスワードをかけることに成功できたようです。 ところが今度、ステップインを行うための操作がわかりません。 パスワードがかかっているからなのでしょうが、解除を行う方法を、素人の私でも理解できるように、 どの画面からどのような操作を行えばいいのか分かるようご教示頂けませんでしょうか。 宜しくお願い致します。

  • エクセルのシート保護をマクロのボタンで

    ご教示下さい。 エクセルでのシート保護の設定をボタン一つで出来るようにと思い、マクロの自動記録で作成してみましたが、設定したはずのパスワードが記録されていません。 シート保護の解除にパスワードの入力が必要なようにする、シート保護のマクロは出来るでしょうか?。 どなたか、よろしくお願いいたします。

  • Excelでたくさんのシートで設定された「ウィンドウ枠の固定」を一括解除したい

    エクセルのマクロで、たくさんのシートで設定された「ウィンドウ枠の固定」を一括解除したいのですが、なかなかうまくいきません。 シートは40くらいあり、それぞれの名前はバラバラです。 マクロの自動記録で各シートを「選んで解除」を繰り返してもいいのですが、シートの名前が変わったりシートが増えたりした時の書き換え作業が発生します。 できれば、全シートで設定されたウィンドウ枠の固定を一括解除できるマクロをお教えいただけませんでしょうか。 よろしくお願いいたします。

  • エクセルのマクロ記録について

    エクセル2007でマクロ1の記録を行い「更新」ボタンにマクロ1を設定しています。Sheet1からSheet12迄の入力データを「更新」ボタンクリックで 削除するように記録しています。 Sheet1からSheet12をシート保護した場合マクロ1は実行エラーになり 各シートを保護解除すると正常に実行します。 Sheetがまたがるマクロの記録はシート保護をするとだめなのでしょうか? 各Sheet共入力セル以外をロックしたい為、シート保護をかけようと思います。

  • VBAマクロについて教えてください

    よろしくお願いします。私はVBAマクロはいまだに理解できていません。 次のマクロは教えてもらったものです。なにをやっているかはわかりますが シートabcは保護にしていますので一行目が実行されません。 そこで一行目を実行する前にシートabcの保護を解除して 一行目を実行後にまた保護を有効にしたいのですが VBAではなんと書いたらいいのでしょうか どなたか教えてください。せっかく式ができても使えなくて困っています Sheets("abc").Range("P5:S8") = Range("P5:S8").Value ActiveWorkbook.Save Application.Quit

  • Excelでsheetに保護をかけたらマクロは動きませんか?

    マクロ初心者です。 Excelでsheetに保護をかけてしまうとマクロは動か なくなるものなのでしょうか?ちなみに、マクロで コピー等の処理を行うセルのロックは解除しておいた のですが…。 sheetを2つ作って、一方の保護付きsheetに情報を 入力をしておき、もう一方の保護無しsheetに同じ 情報をコピーした上でマクロ処理させる、という 方法は考えたのですが、もっとスマートな方法を ご存知でしたら教えて下さい。よろしくお願い致し ます。

  • エクセルのマクロでシート保護解除時に・・・

    エクセルのマクロでシート保護解除時に・・・ EXCEL2000を使っています。 ワークシートの保護を解除したタイミングで、マクロを自動実行することは可能でしょうか? 現在このような状態になっています。 特定の列(AとB)に保護がかかっています。一般社員はC列以降に入力可能で、パスワード を知っている管理職はA、B列に入力ができるようにしています。 A,B列にはリストボックスを設定しているのですが、これだとパスワードを知らなくても リストボックスで変更する事ができてしまいます。 そういうわけで、パスワードを外したときにリストボックスが表れるようにマクロを設定 したいと思っています。 VBAをいじった事がほとんどありませんでしたので、これまでのところは色々な方のコード を見ながら進めてきたのですが、「パスワードを解除した時に発動する」という条件を 見つける事ができなかったため、困窮した挙句この場で質問させて頂きました。 すみませんが、どなたかアドバイス頂けないでしょうか。 よろしくおねがいします。

  • excelでマクロが使えません

    windows10で、microsoft office 2019 のexcelを使用していますが、bookにパスワードをかけて保護しています。 2~3か月前セキュリティがアップデートで変更されたのが原因ではないかと思うのですが、マクロが使用できなくなりました。 パスワードを解除すればマクロは使用できるのですが、パスワードは残したままで、マクロを使用したいのですがどうすればいいのですか?よろしくおねがいします。 ※OKWAVEより補足:「富士通FMV」についての質問です。

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

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

専門家に質問してみよう