[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『数式を利用した条件付き書式のVBA』(カカポ)
ホームタブにある条件付き書式(数式を使用して書式設定するセルを決定)をVBAで実施したいのですが、コードの書き方がわかりません。
数式(=A2>10)を満たす場合、A1のセルを赤(RGB(255, 0, 0))で塗りつぶすという条件付き書式を設定するにはどういったコードを書けばよいでしょうか?
よろしくお願いします。
< 使用 Excel:Excel2010、使用 OS:Windows10 >
Sub getColeredRed() With Range("A1").FormatConditions .Add Type:=xlExpression, Formula1:="=A2>10" .Item(.Count).SetFirstPriority .Item(1).Interior.Color = RGB(255, 0, 0) .Item(1).StopIfTrue = False End With End Sub
(半平太) 2020/05/21(木) 11:12
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.