比较不同的单元格的值,设置不同的颜色

灰太狼 2022-09-22 01:15 186阅读 0赞

Sub SetDifferentColor()
    '
    ' 比较不同的单元格的值,设置不同的颜色
    '
    
       Dim colors  As Variant
       
       colors = Array(21, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20)
      
        Dim colname As String
        
        Dim lastindex As Integer
       
        Dim i As Integer
        Dim target As String
        Dim model As String
        Dim colorindex As Integer
        
        colname = InputBox("请输入需要比较的列")
        If Len(colname) = 0 Then
            Exit Sub
        End If
        
        lastindex = Range(colname & 65536).End(xlUp).Row
        For i = lastindex To 1 Step -1
            model = Range(colname & i).Value
            colorindex = Range(colname & i).Interior.colorindex
            If colorindex = xlNone Then
                For ii = i - 1 To 1 Step -1
                    target = Range(colname & ii).Value
                    If model = target Then
                        Range(colname & i).Interior.colorindex = colors(i Mod 20)
                        Range(colname & ii).Interior.colorindex = colors(i Mod 20)
                    End If
                Next
            End If
    
        Next
        
    End Sub

发表评论取消回复

表情：

评论列表（有 0 条评论，186人围观）

还没有评论，来说两句吧...

相关阅读

相关 UILabel的text设置不同颜色、字体

下载地址 [ GitHub源码][GitHub] 或 [Demo下载][Demo] 在项目开发中，经常会遇到同一行文本显示的字体颜色和大小不一样，看着可以使用两个label来

我会带着你远行/ 2023年10月17日 08:45/ 0 赞/ 148 阅读

相关 toolbox.feature.magicType 设置不同的颜色

首先是[https://segmentfault.com/q/1010000013977846][https_segmentfault.com_q_10100000139778

深藏阁楼爱情的钟/ 2023年07月01日 04:26/ 0 赞/ 20 阅读

相关 poi 一个单元格不同字体

try { HSSFWorkbook workbook = new HSSFWorkbook(); HSSFSheet

Dear 丶/ 2022年11月29日 13:27/ 0 赞/ 238 阅读

相关 poi设置单元格背景颜色

Java使用poi可以很方便地导出Excel表格文件，同时可以设置各种样式，例如背景颜色。下面给出两个例子设置背景颜色，一个使用自带的颜色设置背景颜色，一个使用自定义颜色设置。

r囧r小猫/ 2022年10月09日 12:14/ 0 赞/ 335 阅读

相关比较不同的单元格的值,设置不同的颜色

Sub SetDifferentColor() ' ' 比较不同的单元格的值,设置不同的颜色 ' Dim colors

灰太狼/ 2022年09月22日 01:15/ 0 赞/ 187 阅读

相关 POI 设置单元格背景颜色

[POI 设置单元格背景颜色][POI] 转载自http://xiaohewoai.iteye.com/blog/1300817 博客分类： [apach

￡神魔★判官ぃ/ 2022年08月12日 13:29/ 0 赞/ 337 阅读

相关 Echarts-图表根据值的不同展示成不同的颜色

series : \[ \{ name:'直接访问', type:'bar',

红太狼/ 2022年05月27日 00:15/ 0 赞/ 265 阅读

相关不同情况下“零值”比较的写法

一、整形变量与“零值”的比较自然，if语句中用0和1（非0）就可以进行条件语句的判断。二、bool变量与“零值”的比较 if()从句中bool变量与零值比较的写法每个

た入场券/ 2022年04月10日 06:57/ 0 赞/ 189 阅读

相关 poi设置一个单元格中文字不同的样式

XSSFCell cell = ExcelCellUtil.getCell(sheet,cellStr); String title = cell.ge

妖狐艹你老母/ 2022年01月31日 14:09/ 0 赞/ 642 阅读

相关 bootstrap-table.js如何根据单元格数据不同显示不同的字体的颜色

在bootstrap-table.js里面列属性 formatter就是用来格式化单元格的，其默认值是undefined 类型是function，function(value,

心已赠人/ 2021年09月12日 02:38/ 0 赞/ 513 阅读