使用英语阅读

通过


Excel) (Databar 对象

代表数据条条件格式规则。 通过对范围应用数据条,有助于查看相对于其他单元格的单元格的值。

备注

所有条件格式设置对象都包含在 FormatConditions 集合对象中,该对象是 Range 集合的子对象。 可以使用 FormatConditions 集合的 AddAddDatabar 方法创建数据条格式规则。

使用 Databar 对象的 MinPointMaxPoint 属性设置数据范围的最短条形图和最长条形图的值。 这些属性返回 ConditionValue 对象,可以使用该对象指定阈值的计算方式。

Databar 对象还提供了另外一些属性,使用这些属性可指定在存在负值时显示的轴线,以及指定数据条的颜色和格式设置。

示例

以下示例创建一个数据区域,然后将数据条应用于该区域。 你会注意到,由于区域中有一个极低值和高值,因此中间值具有长度相似的数据条。 为了明确显示中间值,示例代码使用 ConditionValue 对象将阈值的计算方式更改为百分点。

Sub CreateDatabarCF() 
 
 Dim cfDatabar As Databar 
 
 ' Create a range of data with a couple of extreme values 
 With ActiveSheet 
 .Range("D1") = 1 
 .Range("D2") = 45 
 .Range("D3") = 50 
 .Range("D2:D3").AutoFill Destination:=Range("D2:D8") 
 .Range("D9") = 500 
 End With 
 
 Range("D1:D9").Select 
 
 ' Create a data bar with default behavior 
 Set cfDatabar = Selection.FormatConditions.AddDatabar 
 MsgBox "Because of the extreme values, middle data bars are very similar" 
 
 ' The MinPoint and MaxPoint properties return a ConditionValue object 
 ' which you can use to change threshold parameters 
 cfDatabar.MinPoint.Modify newtype:=xlConditionValuePercentile, _ 
 newvalue:=5 
 cfDatabar.MaxPoint.Modify newtype:=xlConditionValuePercentile, _ 
 newvalue:=75 
 
End Sub

方法

属性

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。