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