Excel-vba：条件付き書式設定：セルスタイル

Question

このフォーマットでは.style関数を使用しようとしていますが、vbaでは使用しません。私はちょうど.styleを間違って使用していますか、または私は細胞を着色するために別の方法を使用する必要がありますか？

'Conditional Formatting 
.FormatConditions.Delete 
.FormatConditions.Add xlErrorsCondition, Formula1:= _ 
    "=IF(" & Cells(SelectedGroup, AreaSelected(2)).Offset(2, 1) & "=""Not Used"",TRUE, _ 
    FALSE)" 
.FormatConditions(1).Style = "Bad" 

.FormatConditions.Add xlErrorsCondition, Formula1:= _ 
    "=IF(" & Cells(SelectedGroup, AreaSelected(2)).Offset(2, 1) & "=""Used"",TRUE,FALSE)" 
.FormatConditions(1).Style = "Good" 

Answer 1

スタイルは、Rangeオブジェクトのプロパティです。これを使用するには、Withステートメントを終了し、そのスタイルをRange自体に適用する必要があります。

https://msdn.microsoft.com/en-us/vba/excel-vba/articles/range-style-property-excel