VBA 如何只将有数据的第一行的底纹设置为红色

发布网友发布时间：2022-05-13 14:54

共2个回答

热心网友时间：2023-10-13 06:56

选中单元格区域----鼠标右键---【设置单元格格式】-----【填充】选项卡---选择一个底色---【确定】即可

热心网友时间：2023-10-13 06:56

Sub 红色()
Dim k
For k = 1 To 6 'A:F 列
X = Range(Cells(1, k), Cells(65536, k)).Find(What:="*", SearchDirection:=xlPrevious).Row
Cells(X, k).Interior.Color = 255
Next
End Sub

假设判断A:F列，每列有数据的第1行填充红色

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com