Chart.ApplyCustomType メソッド (Project)

カスタム グラフの種類をグラフに適用します。

構文

expression。 ApplyCustomType (ChartType,TypeName)

expression は Chart オブジェクトを表す変数です。

パラメーター

名前	必須 / オプション	データ型	説明
ChartType	必須	Office.XlChartType	グラフの種類です。
TypeName	省略可能	バリアント型	グラフの種類の名前。
ChartType	必須	XLCHARTTYPE
TypeName	省略可能	バリアント型

戻り値

Nothing

例

次の例では、グラフの種類をクラスター化された 3D 横棒グラフに変更します。

Sub SetChartType()
    Dim chartShape As Shape
    Dim reportName As String
    
    reportName = "Simple scalar chart"
    Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
    
    Debug.Print "Chart type before: " & chartShape.Chart.ChartType
    chartShape.Chart.ApplyCustomType (xl3DBarClustered)
    Debug.Print "Chart type after: " & chartShape.Chart.ChartType
End Sub

関連項目

Chart オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。