Excel VBA教程:HasDiagram属性

返回是图形还是图形区域包含图表。MsoTriState 类型,只读。

MsoTriState 可为以下 MsoTriState 常量之一。
msoCTrue  不用于本属性。
msoFalse  当图形不是图表时返回该值。
msoTriStateMixed  不用于本属性。
msoTriStateToggle  不用于本属性。
msoTrue  当图形是图表时返回该值。

expression.HasDiagram

expression   必需。该表达式返回“应用于”列表中的对象之一。

Excel VBA教程:HasDiagram属性·示例

下例将一个图表放置在活动工作表中,然后显示一则是否成功创建了图表的消息。


Sub CheckforDiagram()
    Dim shDiagram As Shape
    Set shDiagram = ActiveSheet.Shapes.AddDiagram( _
        Type:=msoDiagramOrgChart, Top:=10, Left:=15, _
        Width:=400, Height:=475)
    ' Notify user about diagram.
    If shDiagram.HasDiagram = msoTrue Then
        MsgBox "Diagram present"
    Else
        MsgBox "No diagram present"
    End If
End Sub

上页:Excel VBA教程:HasDataTable属性 下页:Excel VBA教程:HasDiagramNode属性

Excel VBA教程:HasDiagram属性

Excel VBA教程:HasDiagramNode属性 Excel VBA教程:HasDisplayUnitLabel属性
Excel VBA教程:HasDropLines属性 Excel VBA教程:HasErrorBars属性
Excel VBA教程:HasFormula属性 Excel VBA教程:HasHiLoLines属性
Excel VBA教程:HasLeaderLines属性 Excel VBA教程:HasLegend属性
Excel VBA教程:HasMajorGridlines属性 Excel VBA教程:HasMemberProperties属性
Excel VBA教程:HasMinorGridlines属性 Excel VBA教程:HasPassword属性
Excel VBA教程:HasPivotFields属性 Excel VBA教程:HasRadarAxisLabels属性
Excel VBA教程:HasRoutingSlip属性 Excel VBA教程:HasSeriesLines属性
Excel VBA教程:HasTitle属性 Excel VBA教程:HasUpDownBars属性
Excel VBA教程:HeaderMargin属性 Excel VBA教程:HeartbeatInterval属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号