ExcelVBA实例
excel表格如何输入赤色数字
东西--选项--安详性--宏安详性--设为中
按alt+f11
插入->;模块
打开模块
在内里输入
Public Function countRedCell(a As Range) As Integer
Dim i As Integer
Dim c As Range
i = 0
For Each c In a
If c.Font.Color = vbRed Then
i = i + 1
End If
Next
countRedCell = i
End Function
好比数据在A列到F列
在G1输入
=countRedCell(A1:F1)
向下填充
2.怎么在excel整个表格里配置输入1自动酿成赤色字体1可以用条件名目,也可以利用自界说数字名目。
一、利用条件名目标操纵方式如下: 步调1:单击全选按钮(列标A和行号1中间的小方块),开始>>>条件名目>>>突出显示单位格法则>>>便是……,如下图: 步调2:在“为便是以下值的单位格配置名目”框中输入数字1,“配置为”下拉框选择“自界说名目”,如下图 步调3:“字体”选项卡中,“颜色”下拉框选择“赤色”图标,再单击“确定”按钮,如下图: 步调4:再单击第2个图中“便是”对话框的“确定”按钮。 结果如下图,便是1的都利用了赤色字体。
2、利用自界说数字名目标操纵方式如下: 步调1:选择要配置的单位格区域,鼠标右击>>>配置单位格名目。 步调2:单击“数字”选项卡,选择“自界说”,在右侧的“范例”框中输入自界说的名目“[赤色][=1]G/通用名目;G/通用名目;@”(不含引号),再单击“确定”按钮,如下图: 常识扩展: 假如要删除条件名目,操纵方式如下: 开始>>>条件名目>>>打点法则,选择“单位格值=1”的法则,再单击“删除法则”按钮,最后单击“确定”按钮就可以了,如下图。
3.在excel奈何统计填充底色为赤色的数字2007版,抖客教程网,可以按颜色筛选,筛选后用公式 =SUBTOTAL(9,A1:A20000)来求A1到A20000中筛选后的和。
2003版:
选中单位格B1,点菜单的插入,名称,界说,名称处输入 abc,引用位置处输入 =GET.CELL(63,A1)
确定。
然后在任意单位格的右边一格好比B2输入 =abc,可以获得其左边单位格的填充颜色代码。公式复制下去,然后用函数SUMIF()求和,好比 =SUMIF(B:B,6,A:A) 可以求A列颜色为黄色的和。
无论2003、2007,虽然也可以用宏自界说函数:
同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴如下代码:
Function sumcolor(rng1 As Range, rng2 As Range) As Single
Dim cell As Range
sumcolor = 0
For Each cell In rng1
If cell.interior.Color = rng2.interior.Color Then sumcolor = sumcolor + cell
Next cell
End Function
回到Excel中,输入 =sumcolor(C3:E7,D4),个中C3:E7是待求和的单位格区域,D4单位格有需要的字体颜色,这两个都可以改的。
4.我想请问下怎么在Excel中玄色数字中快输找到赤色相应的数字,大神选中一整列 点击 筛选>;颜色筛选 如下图 别离是 WPS表格 和 Microsoft excel的筛选方式。