为什么我会遇到VBA Typer不匹配错误？

发布于 2025-02-11 15:33:31 字数 233 浏览 1 评论 0原文

尝试在我的VBA代码中创建一个有条件的语句，以突出显示C列中的任何小于2的RED。

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

不确定为什么我会遇到类型不匹配错误。

原文

Trying to create a conditional statement in my VBA code for a pivot table to highlight red any values less than 2 in Column C.

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

Not sure why I'm getting a type mismatch error.

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

走野 2025-02-18 15:33:31

我喜欢有条件的格式选项。

否则类似的事情可能会很好地工作：

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

我还没有检查颜色的实际应用

这应该使您更加接近

I like the conditional formatting option.

otherwise something like this might work well:

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

I haven't checked the actual application of colour

this should get you a little closer

回复收藏 0 原文

~没有更多了~