excel中如何用VB实现在同一列中查找相同颜色单元格之间的数据，并在前一列做同一标记

如图，

右边是源数据，左边是要实现的效果，具体要求是将两个有颜色单元格之间的数据用a1,a2...an按顺序来标记，哪位大神帮忙~~~多谢~除了VB还能否有别的办法?

最新回答

林中教师

2025-06-27 06:15:16

假定原数据在ABC三列，通过窗体设置一个按钮，输入以下代码：

Sheet1.Range("B:B").Insert
Dim i, j, k, l As Integer
i = 1
k = 0
j = Application.WorksheetFunction.CountA(Sheet1.Range("C:C"))
For i = 2 To j
l = Sheet1.Cells(i, 3).Interior.ColorIndex
If l = 50 Then
k = k + 1
End If
Sheet1.Cells(i, 2).Value = "a" & k
Next

我不会写诗

2025-06-27 12:38:21

用vba解决是简单的，用公式解决就比较有挑战。你要哪种方法？

追问