[[20050508012439]]　『シート保護でグループ化コマンドが操作出来ない』（小）　ページの最後に飛ぶ

『シート保護でグループ化コマンドが操作出来ない』（小）

[シートの保護をすると、グループ化したコマンドが操作出来ない]

スケジュール表を作って、列方向にグループ化（各月と日）を行いました。
複数の人が使用するため、入力されては困るセルを保護しました。
所が,シートの保護をかけると、折角設定した、グループ化のボタンが操作
出来ません。保護を解除しなくてはならないメッセージが出てしまいます。

保護をかけながら、グループ化のコマンドを操作する方法はありますか？

もしくは、シートの保護以外に、入力されては困るセルだけを保護する方法はありますか？

EXCEL2002です。

よろしくお願いいたします。

 レスが付かない様ですので
 >入力されては困るセルだけを保護する方法はありますか？
 別案ですが指定した範囲以外は選択させない様にする。
でも先にグループ化を設定しておかないとグループ化も設定できません。(^^;;;
または
If Not Intersect(Target, Range("C9:H20")) Is Nothing Then
これの
Notをとってひっくり返すと
If Intersect(Target, Range("C9:H20")) Is Nothing Then
指定した範囲しか選択出来なくなりますが、
指定した範囲を含んで保護したい範囲を選択することが出来てしまうので
良し悪しです。シートの見出しを右クリックしてコードを表示させて
そこに貼り付けます。どうでしょうか？
Option Explicit
Dim MyRange As String
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.EnableEvents = False
    If Not Intersect(Target, Range("C9:H20")) Is Nothing Then
        If MyRange = "" Then
            Range("C9:H20").Cells(1, 1).Select
        Else
            Range(MyRange).Select
        End If
        MsgBox Target.Address(0, 0) & "　は選択出来ません。"
    Else
        MyRange = Target.Address
    End If
Application.EnableEvents = True
End Sub
（SoulMan）

コメント返信：

[ 一覧(最新更新順) ]

[[20050508012439]] 『シート保護でグループ化コマンドが操作出来ない』（小） ページの最後に飛ぶ

[[20050508012439]]　『シート保護でグループ化コマンドが操作出来ない』（小）　ページの最後に飛ぶ