エクセルVBA taihenda***さん 先ほどはありがとうございました ラベルの位置(できれば点の上がよいです、 あと文字サイズの調整の仕方が分かりません。
エクセルVBA taihenda***さん 先ほどはありがとうございました ラベルの位置(できれば点の上がよいです、 あと文字サイズの調整の仕方が分かりません。 https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q13262145798
Excel | Visual Basic・42閲覧
ベストアンサー
Sub test() Dim i As Long With ActiveSheet.ChartObjects(1).Chart.SeriesCollection(1) For i = 1 To .Points.Count With .Points(i) .HasDataLabel = True .DataLabel.Caption = Cells(i + 1, 3) .DataLabel.Position = xlLabelPositionAbove End With Next End With 'xlLabelPositionBelow下 'xlLabelPositionRight右 'xlLabelPositionLeft左 'xlLabelPositionCenter中央 End Sub
質問者からのお礼コメント
ありがとうございました。
お礼日時:5/22 10:32