使用VBA將條件格式應用於一系列單元格

我想知道如何訪問標題爲「適用於」的條件格式的列並輸入自己的條件。我已經包含了一個截圖，以供參考。使用VBA將條件格式應用於一系列單元格

Applies To column

我在條件格式添加代碼的語法是，

With Selection 
    .FormatConditions.Delete 
    .FormatConditions.Add Type:=xlExpression, Formula1:="=" & c.Address & "=TRUE" 
    . 
    . 
    . 
End With

我相信代碼應該在那裏加入，但我只是找不到正確的語法。

更新：

我更新了我的代碼看起來像這樣，

With Range(Cells(c.Row, "B"), Cells(c.Row, "N")) 
    .FormatConditions.Delete 
    .FormatConditions.Add Type:=xlExpression, Formula1:="=" & c.Address 
    .FormatConditions(1).Interior.ColorIndex = 15 'change for other color when ticked 
End With

這實際上將使相關的地方，我放在複選框的特定範圍的行，有其背景顏色改變。複選框的位置由c.Address表示，其中「c」包含我選擇放置複選框的單元格的位置。

來源

2014-01-22 winhung

謝謝，你的線索幫助我很多 – winhung

你需要做這樣的事情（Range("A25")是你要什麼找）：

With Range("A25") 
     .FormatConditions.Delete 
     .FormatConditions.Add Type:=xlExpression, _ 
      Formula1:="=" & c.Address 
     '. 
     '. 
     '. 
End With

，也沒有必要寫"=" & c.Address & "=TRUE"，你可以只使用"=" & c.Address。

來源

2014-01-22 11:05:14

怎麼可能這個工作就像一個的isBlank功能需要一個參數？ – 12MonthsASlav

「適用於」是在With塊執行的選擇中固有的。

來源

2014-01-22 11:04:33 teylyn

嗨特林，你是什麼意思固有的？你的意思是有一種語法可以迎合選擇中的「適用於」？ – winhung

我的意思是你有一個選擇的單元格範圍。這是將用於「適用於」的範圍。 – teylyn

噢，我明白了。是的，這是有道理的。 – winhung

使用VBA將條件格式應用於一系列單元格

回答

相關問題