総ありがとう 4,692万
詳細
検索
締切済み

EXCELのVBAマクロについて

  • 困ってます
  • 質問No.20055
  • 閲覧数277
  • ありがとう数2
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 0% (0/1)

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

回答 （全1件）

  • 回答No.1

ベストアンサー率 55% (132/236)

ロックする方法はわかりませんがこういう方法もありますよ
----------------------------------------------------

メニューバーのウィンドウ枠固定又はウィンドウ枠固定の解除をメニューバーから非表示にしてシートを変更したら元に戻す
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

-----------------------------------------------------

意図しているものと違っていたらすみません
回答をシェアする
通報する
共感・感謝の気持ちを伝えよう！ ありがとう0 （OK-チップをおくる）
感謝経済
AIエージェント「あい」

こんにちは。AIエージェントの「あい」です。
あなたの悩みに、OKWAVE 3,500万件のQ&Aを分析して最適な回答をご提案します。

送 信
関連するQ&A
このやり方知ってる！同じこと困ったことある。経験を教えて！
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
詳細検索

特集

[一覧]


感謝指数によるOK-チップ配布スタート！

AIがおススメ！知っておきたいQ&A

ピックアップ

カテゴリ

[ 一覧 ]
ページ先頭へ

あなたを助けてくれる人がここにいる あなたも誰かを助けることができる

誰かの疑問に誰かが答えることでQ&A が出来上がり、後で見に来たたくさんの人の悩みの解決に役立てられています。
あなたもQ&A で誰かの悩みに答えてみませんか？ 詳しくはこちら
カテゴリ別にQ&Aを見る
キーワードでQ&A、テーマを検索する
詳細検索
コンテンツ
コンタクト
関連サービス
OKWAVE bestanswer
Copyright © 2018 OKWAVE All Rights Reserved.