[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『データラベル』(南米一)
日々変化する、折れ線グラフのデータラベルの一番右(最新)だけを表示したいの ですが、出来ないでしょうか?
< 使用 Excel:Excel2007、使用 OS:Windows7 >
Sub test() Dim ser As Series Dim i As Long
With ActiveSheet.ChartObjects(Application.Caller).Chart For Each ser In .SeriesCollection With ser .HasDataLabels = True For i = 1 To .Points.Count - 1 .Points(i).DataLabel.Text = "" Next End With Next End With
End Sub
(マナ) 2014/11/23(日) 21:07
データラベルを表示する用の系列を 一つ追加するのはどうですか? (HANA) 2014/11/23(日) 21:33
(マナ) 2014/11/23(日) 21:41
マナさん、HANAさんありがとうございます。 マナさんの作って頂いたマクロを試してみましたが、表示されていたものは消えるのですが、最新の データラベルは表示されませんでした。やりかたがまずいのでしょうか?
(HANAさんのデータラベルを表示する用の系列を一つ追加する)考えているのですが、 具体的にどうしたらしょうか?ご指導お願いします。 (南米一) 2014/11/23(日) 22:13
(マナ) 2014/11/23(日) 22:36
たとえば [A] [B] [C] [1] 項目 データ ラベル用 [2] 1 2 #N/A [3] 2 4 #N/A [4] 3 6 #N/A [5] 4 8 #N/A [6] 5 10 10 C2に =IF(B3="",B2,NA()) の式をいれて、C6までフィルドラッグ。
A1:C6の範囲で折れ線グラフを作成し 「ラベル用」の系列のみ、データラベルを表示。 (HANA) 2014/11/23(日) 22:42
マナさん、グラフに回答頂いたマクロを設定し、クリックするとプログラムは最後ま で走るんですが。
HANAさん、わかりました。そういうことなんですね。とても考え付きませんでした。 ありがとうございました。 (南米一) 2014/11/23(日) 23:04
.HasDataLabels = True ↓ .DataLabels.AutoText = True
で、どうなりますか。
(マナ) 2014/11/23(日) 23:26
(マナ) 2014/11/24(月) 08:36
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.