|
>>「数式が」「=LEN(A1)<>0」
>この場合はエクセルのどこに書けばいいのか迷っています。
条件付書式を利用します。
設定したいセル範囲を、予め選択しておいてから、
メニューから 書式 >> 条件付書式 のダイアログで、条件1(1)の指定を↓のようにします。
「数式が」「=LEN(A1)<>0」
※ A1 の部分は、実際に処理対象となるセル
書式ボタンをクリックして、お好みの書式を設定してOKボタンをクリック
>>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
>changeイベントってどうやってひょうじさせるのでしょうか。
こちらは、対象となるシート名が表示されているタブのところで右クリックして、
メニューから「コードの表示」をクリックすると、画面が変わります。
右側の広い、白いところに、↑の Private 〜 End Sub の部分をコピーして貼り付けます。
上記は、同様の目的を達成するための2種類の別の方法ですので、
いずれか片方のみでよいと思います。
|
|