Excel VBA

Excel_VBA_Orientation_X_Label

https://www.nicovideo.jp/watch/sm45461549

グラフの横軸の数値を斜めにしたいあなたへ

                        
                        Sub グラフの横軸の数値を斜めにする()
                            ' 桁数の大きい横軸の数値を斜めに傾けたいときに使うマクロです。
                            ' ※グラフのあるシートを選択してからこのマクロを実行してください。
                            Dim chrtCount As Integer
                            Dim i As Integer
                            chrtCount = ActiveSheet.ChartObjects.Count
                            For i = 1 To chrtCount
                                ActiveSheet.ChartObjects(i).Chart.Axes(xlCategory).TickLabels.Orientation = -45   '←傾けたい角度（－90度から＋90度の範囲）を入力してください
                            Next
                        End Sub
                        
                    

参考文献・リンク

1. ksk1130, 「管理人Kのひとりごと」グラフの横軸ラベルを90度回転させる(ExcelVBA), 2022/02/16.
   https://www.k-hitorigoto.online/entry/2022/02/16/080000