Home » パワーポイントマクロ・PowerPoint VBAの使い方 » グラフ・Chart » PowerPoint VBAでグラフのデータテーブル表示を切り替える

PowerPoint VBAでグラフのデータテーブル表示を切り替える

動作検証バージョン：64bit Windows 10 Pro + 32bit PowerPoint（バージョン2105 ビルド14026.20246 Microsoft Store）

PowerPoint.Chart.HasDataTable

「powerpoint vba グラフのtable 表」
といった検索キーワードでアクセスがありました。

何を探していらしたのか判断に迷うところですが、ここではグラフのデータテーブル表示を切り替えるPowerPoint VBAのコードをご紹介します。

［スポンサードリンク］

データテーブルの表示を切り替えるサンプル

アクティブなプレゼンテーションの、先頭スライドの2つ目の図形にグラフが存在するときに、以下のSubプロシージャを実行すると、データテーブルが表示されていなければ表示され、表示されていれば非表示になります。

Sub データテーブルの表示を切り替える()
　With ActivePresentation.Slides(1).Shapes(2).Chart
　　.HasDataTable = Not .HasDataTable
　End With
End Sub

「ActivePresentation.Slides(1).Shapes(2)」までは、拙著『いちばんやさしいPowerPoint VBAの教本』でも解説している、PowerPointのもっとも基本であるオブジェクトの階層を辿るコードです。

PowerPoint VBAの場合、Shapeオブジェクトに用意されているChartプロパティを使うと、グラフを表すChartオブジェクトが取得できます。

PowerPoint.Shape.Chart

Shape.Chartプロパティで取得したChartオブジェクトのHasDataTableプロパティを使って、

PowerPoint.Chart.HasDataTable

データテーブルの表示・非表示を切り替えています。

Chart.HasDataTableプロパティの戻り値はBoolean型なので、VBAのNot演算子を使うことで、TrueならFalseに、FalseならTrueに変更できます。

単純にデータテーブルを表示させたいのなら、
　　With ActivePresentation.Slides(1).Shapes(2).Chart
　　　.HasDataTable = True

非表示にしたいのなら、
　　With ActivePresentation.Slides(1).Shapes(2).Chart
　　　.HasDataTable = False
です。

最終更新日時：2021-09-08 01:36

［スポンサードリンク］

Home » パワーポイントマクロ・PowerPoint VBAの使い方 » グラフ・Chart » PowerPoint VBAでグラフのデータテーブル表示を切り替える

『インストラクターのネタ帳』では、2003年10月からMicrosoft Officeの使い方などを紹介し続けています。
日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

上記の『Excel VBAユーザーのためのPythonプログラミング』の、元になったキンドル本です↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓

PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓

数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓

小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓

Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓

Excel VBAの経験がある方を対象に、Word VBAの基本をキンドル本としてまとめました↓↓

Excel VBAユーザーの方を対象として、Wordの表をVBAで操作する基礎をまとめました↓↓

図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓

グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓

Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

「グラフ・Chart」の記事一覧