Tag: 颜色

Tab ColorIndex reset excel vba

我写了一个VBA脚本,它在单元格的值函数中改变了工作表选项卡的颜色。 脚本运行良好,当我把值,但是当我清除单元格的内容值,脚本失败,颜色选项卡不重置。 这本书上的脚本: Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Not Application.Intersect(Target, Range("BH37")) Is Nothing Then Call CouleurOnglet(Sh, Target) End If End Sub 模块上的脚本: Sub CouleurOnglet(Sh As Object, Target As Range) With Sh Select Case Target Case Is = "OK" .Tab.ColorIndex = 4 'Couleur verte Case Is = "NOK" .Tab.ColorIndex = […]

根据相邻列中的值更改单元格颜色

我确定这很容易,但我不能为我做条件格式的工作。 我试图做的(例如附件),有一个date列,一个行采取行和一列来断言行动是否完成(是/否)。 这个工作表将会每天都在扩展,所以需要面向未来。 我试图让列b中的单元格在列C中的相邻单元格中显示“n”时显示红色,或者在列c中input“y”时将其更改为绿色。 我可以得到一个单元格,但是当我将格式应用到整列时,它会将列“B”中的所有单元格更改为绿色,当我键入“Y”时查看示例 。 我想我需要的是一个'if'语句,或者是一种将公式拖拽到B列的方法 – 但是我无法解决这个问题。 任何帮助感激地感谢!

使用Worksheet.Range.Autofilter(字段,标准,运算符)按特定颜色索引/ RGB过滤范围

我正在做一些使用C#的自动化excel操作。 我一直很难搞清楚如何基于特定的颜色自动过滤。 关于这种types的操作几乎没有文档,但是我发现它有一些VB.net和VBA代码。 我似乎无法将代码转换为C#,因为“RGB”不可用,因为它在VB.net和VBA中(请参阅下面的VB.net代码)。 既然这个问题一直没有答案,我想指定需要查看的代码。 在Autofilter(字段,标准,运算符),我需要知道C#Microsoft.Office.Interop.Excel标准,让我select一种颜色来过滤。 这是我的代码看起来像: Excel.Worksheet xs1: Excel.Range xRange1; Excel.Range xRange2; Excel.Range lastrow; Excel.Range lastcol; lastrow = xs1.Rows.End[Excel.XlDirection.xlDown]; lastcol = xs1.Columns.End[Excel.XlDirection.xlToRight]; xRange1 = xs1.Cells[2, 14]; xRange2 = xs1.Cells[lastrow.Row, 14]; 下面select整个工作表并添加一个自动筛选器(),将其设置为过滤颜色。 这工作正常,但如何挑选我想要过滤的颜色? xs1.Range["A1", xs1.Cells[lastrow.Row, lastcol.Column]]. AutoFilter(14,Excel.XlColorIndex.xlColorIndexAutomatic, Excel.XlAutoFilterOperator.xlFilterCellColor); 这里是一个自动筛选代码在VB.net中看起来像什么的例子。 在excelmacros中,它看起来也非常相似。 xs1.Range("A1", xs1.Cells(lastrow.Row, lastcol.Column)). AutoFilter(Field:=14,Criteria1:=RGB(0,202,255), Operator:=Excel.XlAutoFilterOperator.xlFilterCellColors)

基于自动字体颜色的Excel总和

Public Function ColorSum(ByVal target As range, ByVal MyColor As String) Dim Blacksum As Long, Othersum As Long, cel As range Application.Volatile Blacksum = 0 Othersum = 0 For Each cel In target If IsNumeric(cel.Value) Then If cel.Font.ColorIndex = 1 Then Blacksum = Blacksum + cel.Value Else Othersum = Othersum + cel.Value End If End If […]

在Excel中,根据单元格中的值设置RGB颜色

我有一个macros为我画了一堆图表。 我想要做的是dynamic改变Data series color 。 我使用RGB颜色古怪和函数.ForeColor.RGB 。 当我直接使用它.ForeColor.RGB = RGB(88, 88, 88) – 一切工作正常。 但是,当我尝试从一个cell color .ForeColor.RGB = Sheets(1).Cells(1, 1)我得到了错误Type missmatch 。 在Cell(1,1)我有价值: RGB(0, 0, 0) 。 如何从cell为Data seriesselectcolor ? 下面的macros和Excel窗口。 Sub Macro1() ActiveSheet.ChartObjects("Chart 1").Activate ActiveChart.FullSeriesCollection(1).Select MsgBox Sheets(1).Cells(1, 1) With Selection.Format.Fill .Visible = msoTrue .ForeColor.RGB = Sheets(1).Cells(1, 1) '.ForeColor.RGB = RGB(88, 88, 88) .Transparency = […]

Powershell根据filter值计算一列中的单元格

我的Excel电子表格有11028行和两列。 第一列有组织单位,第二列有价值。 在Excel中,我可以过滤第一列,以便有大约100个不同的组织单位。 对于每个组织单位,我要计数(1)总行数(2)值为“未知”的行数。 如果我手动执行此操作,将会花费很长时间,因此我正在寻找PowerShell中的某种API,这将允许我根据列A中设置的filter来计算列B中的行数。 这甚至可以在Powershell?

使自定义Excel VBAfunction更快

我有一个自定义函数,用来计算或总结我有多less个彩色单元格。 这是function: Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean) Application.Volatile (True) Dim rCell As Range Dim lCol As Long Dim vResult lCol = rColor.Interior.ColorIndex If SUM = True Then For Each rCell In rRange If rCell.Interior.ColorIndex = lCol Then vResult = WorksheetFunction.SUM(rCell, vResult) End If Next rCell Else For Each rCell […]

根据颜色和date求和单元格

我有以下几点: date ——- 成本 Jan £500 Jan £600 Feb £300 Feb £600 March £1000 March £500 成本单元根据其当前状态(已确认的绿色,未经确认的白色,半确认的黄色)而着色不同,我需要一个公式来计算所有成本,例如绿色和二月份。 我知道这种颜色函数需要VBA,并find了一个有用的称为colorfunction(),允许我使用下面的公式计算颜色的单元格: colorfunction(A1, B1:B5, FALSE) A1是比较范围的颜色,而FALSE / TRUE是返回总和或计数结果。 但是我不能将这个自定义函数工作到MONTH()公式或SUMIF。 我可能会完全过度复杂化,所以请指出我在试图解决这个问题时所犯的任何愚蠢的错误。

基于相邻小区的条件格式

我有一个相关matrix,每个相关性表示在两行单元格中 – 顶部单元格是r值,底部单元格是p值。 我想根据它下面的单元格中的p值(基本上,我想根据重要性对相关性进行着色)来对包含r值的单元格进行条件格式化。 这非常复杂,在条件格式必须是不同的行不同的,因为我不希望p值是基于它下面的r值着色…是否有任何简单的方法来做到这一点没有多个数据表和交叉引用?

用java改变excel单元格颜色

我必须用一个简单的公式validation单元格,如果这是无效的,改变单元格的颜色,如黄色或红色,没关系。 到目前为止,我已经看到并尝试这个: SheetConditionalFormatting sheetCF = sheet.getSheetConditionalFormatting(); // formula = =SUMA(L13+M13+N13+O13) //=SUMA(M4+N4+O4+P4+L:L ConditionalFormattingRule rule2 = sheetCF.createConditionalFormattingRule(ComparisonOperator.EQUAL, "4"); PatternFormatting fill2 = rule2.createPatternFormatting(); fill2.setFillBackgroundColor(IndexedColors.GREEN.index); fill2.setFillPattern(PatternFormatting.SOLID_FOREGROUND); CellRangeAddress[] regions = { CellRangeAddress.valueOf("L2:L5")}; sheetCF.addConditionalFormatting(regions, rule2); } 如果价值是四,我知道,那改变我颜色,但是 我怎样才能申请的总和公式: 我需要在列L的所有行中validationm2 + n2 + o2 + p2和m3 + n3 + o3 + p3等的总和。 仅供参考,我从数据库中得到的值,这些值是像在图片与十进制,但我得到他们在Java中的int像这样: while((j < fallas) && rset.next() ){ row = sheet.createRow(j+1); […]