gpt4 book ai didi

excel - 如何在没有填充的情况下更改excel中单元格的值

转载 作者:行者123 更新时间:2023-12-04 22:20:43 24 4
gpt4 key购买 nike

我在 excel 中有一个电子表格,其中彩色单元格包含值,没有填充的单元格是空的。我希望所有没有填充颜色的单元格都有值 0 .我有我用来给黑色和黄色单元格值的代码 12分别。

Sub changeValuesBasedOnColour()

Dim rg As Range
Dim xRg As Range
Set xRg = Selection.Cells
Application.DisplayAlerts = False
For Each rg In xRg
With rg
Select Case .Interior.Color
Case Is = 0 'Black
.Value = 1
Case Is = 65535 'Yellow
.Value = 2
Case Is = xlNone
.Value = 0

End Select
End With
Next
Application.DisplayAlerts = False

End Sub
我已经编辑了我用来根据填充颜色更改单元格值的代码以包含此部分:
 Case Is = xlNone
.Value = 0
但是我的电子表格没有变化。如何编辑我的代码以引用没有填充颜色的单元格?

最佳答案

使用vbWhite16777215 .xlNone适用于小区的.Interior.ColorIndex , 与 .Interior.Color 不同.

关于excel - 如何在没有填充的情况下更改excel中单元格的值,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/63821256/

24 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com