gpt4 book ai didi

vba - 如何使用 VBA 宏突出显示空/空白单元格

转载 作者:行者123 更新时间:2023-12-03 02:04:40 25 4
gpt4 key购买 nike

我意识到我问了第一个问题就搞砸了,所以我会最后一次尝试。我的目标是 2 个单独的工作表中的相同 4 列,这些工作表的单元格要么包含文本,要么不包含文本。表 1 将自动更新,因此我将每天运行此代码来手动更新表 2。我正在尝试找到一种方法来基本上找出哪些单元格缺少使用宏的文本。我尝试使用在该网站上找到的代码,该代码在包含文本的单元格上添加边框并清除空单元格的边框。

Sub BorderForNonEmpty()
Dim myRange As Range
Set myRange = Sheet1.Range("C2:C252")

' Clear Existing Borders
myRange.Borders.Linestyle = xlLineStyleNone

' Test Each Cell and Put a Border Around it if it has content
For Each myCell in myRange
If myCell.Text <> "" Then
myCell.BorderAround (xlContinuous)
End If
Next
End Sub

这段代码有效,但我想尝试用与清除其边框相反的颜色突出显示空单元格。这也是我第一次在 StackOverflow 上发帖,所以我先道歉。谢谢。

最佳答案

Excel 有一个内置函数来选择空白单元格,而不是循环遍历所有单元格。这应该更快、更可靠。

Sub BorderForNonEmpty()
Dim myRange As Range
Set myRange = Sheet1.Range("C2:C252")

'clear all color
myRange.Interior.ColorIndex = xlNone

'color only blank cells
myRange.SpecialCells(xlCellTypeBlanks).Interior.ColorIndex = 6
End Sub

另一种选择可能是仅使用条件格式(另一个内置功能),但这可能很难控制更改范围。

关于vba - 如何使用 VBA 宏突出显示空/空白单元格,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/23954396/

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