Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8569 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【32530】エクセルのグラフで区分線に値を表示する方法 t29x0479 05/12/16(金) 21:07 質問[未読]
【32536】Re:エクセルのグラフで区分線に値を表示す... Kein 05/12/16(金) 22:44 回答[未読]
【32530】エクセルのグラフで区分線に値を表示する...
質問  t29x0479  - 05/12/16(金) 21:07 -
引用なし
パスワード
   エクセルのグラフで、総受付数と受注数の2つを棒グラフで表示し、その2つを区分線で結んでいます。
総受付数100で、受注数が10の場合、区分線の横に10%と表示したいのですが、区分線に2つの値の比率を表示したり、どこかのセルの値を参照して表示することって可能なのでしょうか？
ご存知の方がいらっしゃいましたら教えてください。よろしくお願いいたします。
【32536】Re:エクセルのグラフで区分線に値を表示...
回答  Kein  - 05/12/16(金) 22:44 -
引用なし
パスワード
   その系列のデータが入力されているセル範囲を参照し、各値のパーセンテージを
計算する数式を、どこかの作業セルに入力して下さい。
例えば C1 以下に数式を入れたとして、そこを参照して・・

Dim i As Integer

With ActiveSheet.ChartObjects(1).Chart.SeriesCollection(1)
　 .ApplyDataLabels xlShowValue
　 For i = 1 To .DataLabels.Count
　　　With .DataLabels(i)
　　　　 .Text = Cells(i, 3).Value & "%"
　　　　 .Font.Size = 8
　　　End With
　 Next i
End With

というようなコードで出来ます。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8569 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free