概要
Excelでデータを可視化する際に、複数のグラフを使って時間変化を表現している方も多いのではないでしょうか。
しかし、X軸が「時間軸」の場合、期間の変更や区切りの調整が必要になるたびに、すべてのグラフを手動で設定し直すのは非常に手間です。
今回は、Excel VBAを使ってシート内のすべてのグラフのX軸（最小値・最大値・区切り幅）を一括で変更する方法をご紹介します。
実現したい仕様
以下のような構成で、指定した数値に基づいてX軸を自動変更する仕様です。
- セル
A1に「X軸の最小値」 - セル
A2に「X軸の最大値」 - セル
A3に「区切り幅（メジャーユニット）」 - 図形で作成した「実行ボタン」を押すと、現在のシート内すべてのグラフのX軸が一括で変更される
実装コード（VBA）
以下のコードを標準モジュールに貼り付けて、図形にマクロ登録してください。
Sub UpdateAxisMajorUnit()
Dim chrt As ChartObject
Dim minValue As Double
Dim maxValue As Double
Dim majorUnit As Double
With ActiveSheet
' A1〜A3の値を読み取り
minValue = .Range("A1").Value
maxValue = .Range("A2").Value
majorUnit = .Range("A3").Value
' シート内すべてのグラフのX軸を更新
For Each chrt In .ChartObjects
With chrt.Chart.Axes(xlCategory, xlPrimary)
.MinimumScale = minValue
.MaximumScale = maxValue
.MajorUnit = majorUnit
End With
Next chrt
End With
MsgBox "完了しました", vbInformation
End Sub
使用方法
- セル
A1に X軸の開始値（例：0） - セル
A2に X軸の終了値（例：100） - セル
A3に X軸の区切り（例：10） - 実行ボタンをクリック
これだけで、すべてのグラフのX軸が一括で更新されます。
応用のヒント
- X軸だけでなく、Y軸（縦軸）も同様の構文で一括変更可能です
- 時系列データの期間を切り替えながらグラフ表示を切り替えたい場面に便利です
- マクロボタンに別の設定パターンを割り当てておけば、複数の期間比較も即時切替できます
まとめ
- Excelで複数のグラフのX軸を手動で調整するのは非効率
- VBAを使えば、セル入力 + ボタン1つでX軸の設定を一括反映可能
- 時間軸を使ったグラフや、ダッシュボードの自動化に最適
Excelで可視化業務を効率化したい方にとって、この方法は非常に有用です。
ここまでお読みいただきありがとうございました。参考になれば幸いです。
スクールの紹介
最後に宣伝をさせてください。
技術で未来を切り拓く―あなたの夢を現実にするプログラミングスクール
Webデザインやプログラミングで成功を目指している方々にとって、このオンラインスクールは夢を叶えるための最適な場所です。皆さんのキャリアを次の段階へと引き上げるためにデザインされたこのスクールは、一人ひとりの成功を心から願い、それを実現するための全てを提供しています。ここでは、このスクールの魅力について詳しくご紹介します。
◆圧倒的な費用対効果
このオンラインプログラミングスクールは、Web系教育において最高の費用対効果を提供しています。多くの高額スクールが存在する中で、ここではリーズナブルな価格で、質の高い教材、無限のサポート、そして実際に市場で求められるスキルの習得機会を提供しています。
◆現役フリーランスの講師陣
講師たちは全員、現役のフリーランスプロフェッショナルです。市場で活躍している講師から直接、最新のトレンドや実践的なスキルを学べるのは、このスクールの大きな特徴です。
◆柔軟な学習コース
固定のコースがなく、学習者の興味やニーズに応じて自由に学習できます。進路変更も自由で、最低契約期間は1ヶ月という柔軟性を持っています。自分のペースで、自分に合った学習が可能です。
◆無制限の添削とサポート
理解できるまで、そして満足するまで、無制限に添削と質問への回答を提供しています。進路相談や技術面以外の相談にも対応しており、全面的にサポートします。
◆社長から学べる貴重な機会
デザイナー、プログラマー、ディレクター、マーケターとして豊富な経験を持つ社長から直接学べるのも、このスクールの特別な点です。他のスクールでは得られない、貴重な機会です。
◆実績作りへの徹底的なサポート
就職、転職、フリーランスとして成功するためには、高品質な実績が必要です。生徒の作品レベルを最大限に高め、市場で求められる実績を作り上げることに力を入れています。案件を取得できない生徒には、直接案件を提供することもあります。
◆メッセージからの約束
高額な授業料を支払わせて結果を出せないスクールとは違い、物理的なサポートは提供できないかもしれませんが、継続的な努力を通じて最高の結果を出せるようにサポートします。一緒に不正なスクールを撲滅し、あなたの夢を実現しましょう。
このプログラミングスクールは、Webデザインやプログラミングでの成功を目指す方々に必要な全てを備えています。今こそ、このコミュニティに参加し、あなたのキャリアを加速させる時です。
詳しくはこちら↓
