添加在Excel的格式條件通過Access VBA

所以目前我在我的幾行代碼，添加在Excel的格式條件通過Access VBA

.Range("C2").Formula = "=IF(B2 = """"," & """REQUIRED""" & "," & """""" & ") " 
.Range("C3").Formula = "=IF(B3 = """"," & """REQUIRED""" & "," & """""" & ") "

我的目標是一個條件格式添加到它，所以如果它等於從範圍所需= $ C $ 2：$ C $ 3將背景紅色變成了紅色，目前爲止我在網上看到了一些代碼，但沒有一個似乎適用。我爲我的目的修改了一些現有的代碼，我在xlExpression「variable not defined」中得到一個錯誤。誰能幫我？

.Range("C2:C3").Selection.FormatConditions.Delete 
.Range("C2:C3").Selection.FormatConditions.Add TYPE:=xlExpression, Formula1:="=(=$C$2:$C$23 = 'REQUIRED')"

來源

2012-10-29 KSM

請沒有全部大寫的標題替換xlExpression！ –

在您手動應用條件格式時嘗試'錄製宏'。這應該提供你需要的語法來解決你的謎語:) –

我已經得到了代碼@ScottHoltzman你還記得我以前的問題，我在SUB中添加了這個，而且我仍然收到錯誤「變量未定義「上xlExpression – KSM

你有2

來源

2018-01-16 11:54:36 pr42

添加在Excel的格式條件通過Access VBA

回答

相關問題