Excelのチャートで軸ラベルを回転させるには？

Excelでチャートを扱う際、軸ラベルが長くなりすぎて重なったり、混雑して見える場合があります。以下に示したスクリーンショットのように、これが原因で特に多くのテキストを含むカテゴリやデータラベルを扱う場合、チャートが読みにくく、解釈しにくくなることがあります。チャート全体をリサイズしたりデータを圧縮する代わりに、Excelでは軸ラベルを回転させることができる柔軟なオプションがあり、これにより視認性とチャート全体の見栄えが向上します。

チャート内の軸ラベルを回転させる
Excel数式：CHAR(10)を使用して軸ラベルに行区切りを挿入
VBA: 複数のチャートで軸ラベルを一括で回転またはカスタム角度に設定

チャート内の軸ラベルを回転させる

チャート内で軸ラベルが混雑している場合、それらを回転させることで、チャートのサイズやレイアウトを大幅に変更することなくスペースを最適化し、読みやすさを向上させることができます。軸ラベルの回転は、特にアンケート回答、製品コード、日付形式など、長いカテゴリ名を持つチャートで役立ちます。

次の手順に従ってください：

Excel 2007/2010での軸ラベルの回転

1. 回転したい軸を右クリックし、コンテキストメニューから「軸の書式設定」を選択します。（誤って軸の外を右クリックしたり、間違った要素を選択した場合は、正しい軸が強調表示されていることを確認してから進んでください。）

2. 「軸の書式設定」ダイアログボックスで、「配置」タブをクリックします。「テキストのレイアウト」セクション内にある「テキストの方向」ドロップダウンリストをクリックし、目的のラベルの向き（水平、テキストを全て90°回転、テキストを全て270°回転、積み上げ）を選択します。異なるシナリオに適したオプションがあります：

• 水平：デフォルトで、短いラベルに最適です。
• テキストを全て90°/270°回転：重なりを避けるために長いラベルに便利です。
• 積み上げ：スペースが限られている場合、各文字または単語を新しい行に配置します。

3. ダイアログを閉じるには「閉じる」をクリックします。チャートはすぐに新しいラベルの向きを反映します。

ヒント: 固定された90°や270°以外のカスタム角度を設定したい場合、「配置」タブに留まり、「カスタム角度」ボックスを調整して希望の回転角度（-90°から+90°）を設定してください。これにより、チャートのレイアウトに基づいてより細かい調整が可能です。

Excel 2013以降のチャートにおける軸ラベルの回転

Microsoft Excel 2013、2016、Microsoft 365、またはそれ以降のバージョンを使っている場合、軸ラベルの書式設定インターフェースは若干更新されていますが、ラベルの整列や方向に関して同様、あるいは時には改善されたオプションが提供されます。

1. チャートを見つけて、回転させたい軸ラベルを右クリックします。コンテキストメニューから「軸の書式設定」を選択します。

2. 画面の右側に「軸の書式設定」ペインが表示されます。「サイズとプロパティ」ボタン（測定マーク付きの四角形のようなアイコン）をクリックします。次に、「テキストの方向」ドロップダウンボックスを見つけ、同様のオプション（水平、テキストを全て90°回転、テキストを全て270°回転、積み上げ）の中から選択します。効果をプレビューしながら調整し、データレイアウトに最適なものを選んでください。

注意: Excel 2013以降でカスタムテキスト角度を設定する場合、「テキストオプション」または「配置」コントロールを探して、希望の角度を入力してください。負の値や過度に大きな角度を設定すると不整合が生じることがあるため、確認前にプレビューで変更内容を確認してください。

予防策: 軸ラベルを回転させても、元のデータやチャート構造は変わりません。回転後もラベルが重なる場合、フォントサイズを縮小したり、可能な限りテキストを短縮したり、チャート全体の寸法を調整して最適な可視化を図るなどのさらなるオプションを検討してください。

ラベルを誤ってずらしてしまった場合や元の設定に戻したい場合は、同じ手順に従って向きを「水平」に戻すだけです。

Excel数式：CHAR(10)を使用して軸ラベルに行区切りを挿入

軸ラベルを回転させても十分な明瞭さが得られない場合（特に美観上の理由でテキストを水平に保ちたい場合）、ラベル自体に改行を導入することができます。この方法は、ラベルが構造化されている場合（都市と州、または製品コードと名前を含むなど）に役立ち、複数行に分けることでテキストの向きを変更せずにチャートを非常に読みやすくすることができます。このソリューションは、複雑な多部分ラベルの場合や、回転したテキストが解釈困難な場合に特に推奨されます。

適用されるシナリオ：

• ラベルの論理的な構造が自然な分割を許可する場合に最適です（例：ハイフン、スラッシュ、スペースで区切られる場合）。
• ダッシュボード、レポート、プレゼンテーションなどで、明瞭さと専門性が重要な場合に理想的です。
• データが動的にチャートに取り込まれる場合、基礎となる数式を更新して自動更新を実現します。

パラメータに関する注意：
CHAR(10) は、Excelで改行（新規行）を表します。これには、関連するセルで 折り返して文字列を表示する が有効になっている必要があります。これにより、複数行のテキストが正しく表示されます。

手順：

1. 元の軸ラベルがA列にあると仮定します。新しい列（例：F列）で以下の数式を入力します（セルF2に入力）：

   =SUBSTITUTE(A1,"-",CHAR(10))

   この数式は、ラベル内のすべてのハイフンを改行に置き換えます。「-」引数をカスタマイズして、カンマ、スペース、または他の文字に基づいてラベル構造を置き換えることができます。
2. Enterキーを押して数式を適用し、残りの軸ラベル元データに対してコピーします。
3. 改行を表示するには、列Bに「折り返して文字列を表示」書式を適用します。これを行うには、列B全体を選択し、ホーム > 折り返して文字列を表示を選択します。

   

4. チャートの軸ラベルが元の列（A列）ではなく、新しい数式列（たとえばF列）を参照するように設定します。
   1. チャート内の任意のバーをクリックしてチャートをアクティブにし、右クリックしてコンテキストメニューから「データの選択...」を選択します。

      

   2. 「データソースの選択」ダイアログボックスで、「水平（カテゴリ）軸ラベル」セクションに移動し、「編集」ボタンをクリックします。

      

   3. 「軸ラベル」ダイアログボックスで、元のラベル範囲を新しい数式範囲に置き換えます。ここで、F列にはSUBSTITUTE(...,CHAR(10))の数式が含まれています。

      

   4. OKをクリックしてラベル範囲を確認し、もう一度OKをクリックして「データソースの選択」ダイアログを閉じます。

エラーの注意：数式を適用しても改行が表示されない場合、関連するセルで「折り返して文字列を表示」が有効になっているか確認してください。また、MacではCHAR(10)が一部のExcelバージョンで異なる動作をすることがあり、必要に応じてテストして調整してください。

VBA: 複数のチャートで軸ラベルを一括で回転またはカスタム角度に設定

高度なユーザー、または多数のチャートを管理している方にとって、個別に軸ラベルを回転させる作業は繰り返しが多く、時間がかかることがあります。VBAマクロを使用することで、このプロセスを自動化できます。例えば、バッチ処理で軸ラベルを回転させたり、カスタム角度を設定したり、ワークブックやワークシート全体のすべてのチャートを対象に操作を行ったりすることが可能です。これは、標準化された企業レポートや、レポートレイアウトを定期的に更新する際に特に役立ちます。

適用されるシナリオ：

• 複数のチャートの書式を同時に更新する（例：会社テンプレート、定期レポート）。
• 企業や出版ガイドラインに従って、すべての軸ラベルに特定の角度または方向を適用する。
• 一貫した書式設定が必要で頻繁な変更や調整がある場合、時間を節約できる。

トラブルシューティングおよびパラメータに関する注意：

• 回転させたい軸に空のセルや結合されたラベルセルが含まれている場合、マクロが期待通りに適用されないことがあります。軸ラベルが標準的なExcelチャート軸であることを確認してください。
• 保護されたワークブック/シートでマクロを実行する場合、最初に保護を解除して変更を許可してください。
• このコードは、必要に応じてX軸またはY軸に適応できます。 

手順：

1. 開発 > Visual BasicをクリックしてVBAエディターを開きます。新しいMicrosoft Visual Basic for Applicationsウィンドウで、挿入 > モジュールをクリックし、開いたモジュールに次のコードを貼り付けます：

Sub RotateAllChartAxisLabels()
    Dim cht As ChartObject
    Dim ws As Worksheet
    Dim angle As Integer
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    angle = Application.InputBox("Enter rotation angle in degrees (-90 to 90):", xTitleId, 45, , , , , 1)
    
    If angle < -90 Or angle > 90 Then
        MsgBox "Enter an angle between -90 and 90 degrees."
        Exit Sub
    End If
    
    For Each ws In ActiveWorkbook.Worksheets
        For Each cht In ws.ChartObjects
            cht.Chart.Axes(xlCategory).TickLabels.Orientation = angle
        Next cht
    Next ws
End Sub

2. コードを入力した後、 ボタンをクリックするか、 F5 を押してマクロを実行します。ダイアログが表示され、希望の回転角度（有効範囲は-90度から90度）を指定できます。

これで、ワークブック内のすべてのチャートのカテゴリ軸ラベルが入力した角度に更新されます。

注意: マクロを適用する前に必ず作業を保存し、Excel設定でマクロが有効になっていることを確認してください。特定のチャート（ピボットチャートや特殊なチャートタイプなど）でエラーが発生する場合、コードを適応させるか、手動で調整する必要があります。

復元: 回転を通常（水平）に戻したい場合は、単にマクロを再実行して回転角度として0を入力します。

マクロが効果がないように見える場合、Excelのセキュリティ設定を確認してマクロが有効になっていることを確認し、チャート軸が標準的なExcelチャート機能を使用していることを確認してください。