システムwiki

チャートの二次X軸内のラベルのフォントサイズを変更する

emerald 受付中 最終更新日:2021-05-02 02:30

マクロレコーダーを使用すると、次のコードが生成されます.

ActiveSheet.chartObjects( "チャート2").

ActiveChart.axes(XLCategory、XLSecondary).Select
selection.format.textFrame2.textrange.font.size= 8

次のようにコードを書き換える場合:

ActiveSheet.chartObjects(1).アクティブ化

ActiveChart

.AXES(XLCATEGORY、XLSECONDARY).FORMAT.TEXTFRAME2.TEXTRANGE.FONT.SIZE= 8

で終わります

次のエラーを取得します.run-timeエラー '6':オーバーフロー

私のコードの書き換えに何が悪いのか教えてもらえますか?あらゆる援助のために事前にありがとうございました.

返信リスト(回答:3)

1 #
emerald

さらに検索した後、HANSVで前述したように、Excel 2010 VBAにバグがあるように見えます( VBAのフォーマット軸フォント

マイコードは次のようにする必要があります.

ActiveSheet.chartObjects(1).アクティブ化

ActiveChart

.Font.Size= 8

で終わります

応答1# ->にスキップ
2 #
Anonymous

また、チャートのアクティブ化を回避するために...

ActiveSheet.ChartObjects(1).Chart.Axes(xlCategory、xlSecondary).TickLabels.Font.Size=8

または、複数のプロパティを変更するには...

ActiveSheet.ChartObjects(1).Chart.Axes(xlCategory、xlSecondary).TickLabels.Font
.Name="Arial"
.Bold=True
.Size=8
Endを使用と

これがお役に立てば幸いです!

3 #
oAnast