為什么我會收到 VBA 打字機不匹配錯誤？

Question

嘗試在我的 VBA 代碼中為數據透視表創建條件語句，以將 C 列中小於 2 的任何值突出顯示為紅色。

 Set result = Range("C:C").Value
             If result < 2 Then
                  MyRange.Font.ColorIndex = 3
             End If

不知道為什么我會收到類型不匹配錯誤。

Answer 1

我喜歡條件格式選項。

否則這樣的事情可能會很好用：

Dim rng as range
for each rng in Range("C1:C" & Range("C" & Rows.Count).End(xlup).row)
    If rng.value < 2 Then
        rng.Font.ColorIndex = 3
    End If
next rng

我還沒有檢查顏色的實際應用

這應該讓你更接近一點