|
▼Asaki さん:
>着色条件によっては、VBAを使わず、一般機能の条件付書式でも可能かもしれません。
>何か入力があったら色を変える
>の条件だとすると
>メニューから 書式 >> 条件付書式 のダイアログで
>「数式が」「=LEN(A1)<>0」
>※ A1 の部分は、実際に処理対象となるセル
>書式ボタンをクリックして、お好みの書式を設定してOKボタンをクリック
>
>VBAの場合、前述のとおりChangeイベントを利用しますが、今回のようなケースでは、
>引数のTargetを相手にするだけでよいかと思います。
>Private Sub Worksheet_Change(ByVal Target As Range)
> Target.Interior.ColorIndex = xlNone
>On Error Resume Next
> Target.SpecialCells( _
> xlCellTypeConstants).Interior.ColorIndex = 34
>On Error GoTo 0
>End Sub
データがセルにあれば色をつけるといくことではなくて、
もともとあるセルにデータがある場合でもデータが変更されたら
色をつけるという処理にしたいのですがどうしたらよいですか。
|
|