[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『複合グラフのデータラベル:今日の値だけ表示したい』(あはは)
棒グラフと折れ線グラフで、データを5つほど表示させて進捗を管理しています。
そのグラフの今日の日付のみにデータラベルを表示させたいです。
現状は、全日程のラベルを一旦表示させ、今日の日付以外を一つひとつ削除していますが
一度に処理する方法はないでしょうか。
Excel2007を使用しています。
ご存知の方いらっしゃいましたら、教えて下さい。
< 使用 Excel:Excel2007、使用 OS:unknown >
アナログ的ですが・・・
>全日程のラベルを一旦表示させ じゃなくて、今日の日付の分だけを選択して表示させればいいのでは? (とらら) 2014/08/29(金) 13:14
Sub test() Dim i As Long
With ActiveSheet.ChartObjects(1).Chart.SeriesCollection(1) For i = 1 To .DataLabels.Count If i <> 3 Then .DataLabels(i).Text = "" End If Next i End With End Sub (???) 2014/08/29(金) 13:44
水上さん
リスト範囲に設定するのでしょうか?
???さん
当方VBAは全く知識がないのですが、同じシートに複数のリストがあって、その中の幾つかをグラフでまとめて表示しています。
試しにコードを実行してみましたが、「オートメーションエラー」となってしまいました。
皆さん、
アドバイスありがとうございました。
もう少し調べてみます!
(あはは) 2014/08/29(金) 18:28
ここの画像みたことあるんだが
つかいかたわからないのでごめん。
(水上) 2014/08/30(土) 06:02
>ラベル表示設定をすると グラフ作成の時点では全てラベルを非表示にしておくんです。 で、グラフ作成後ラベルの表示をさせたい要素の部分だけを選択して(一つずつしかできないかと、ですが)、 右クリック→データラベルの追加をクリック で ラベル表示をさせるとその選択した要素の分だけのラベルが出てるはずなんですが・・・ (とらら) 2014/09/01(月) 11:46
Sub test() Dim i As Long
With ActiveSheet.ChartObjects(1).Chart.SeriesCollection(1) .ApplyDataLabels For i = 1 To .DataLabels.Count If i <> 3 Then .DataLabels(i).Text = "" End If Next i End With End Sub
.ChartObjects(1) の数字を変えると、何番目のチャートなのかが変わります。
.SeriesCollection(1) の数字を変えると、何本目のグラフなのかが変わります。
(???) 2014/09/02(火) 09:36
水上さん
当方エクセル2007を使用しているのですが、理解不足で上手く出来ませんでした。
折角アドバイス頂いたのですが、申し訳ない・・・
とららさん
ラベル表示したい日付の部分をグラフ上で選択して、データラベルの追加で出てきました。
グラフが密接していない場合には簡単便利で良いですね。
ありがとうございます。
グラフを普段仕事で使用していなかったので、みなさんのアドバイスが凄く助かりました。
ありがとうございました。
(あはは) 2014/09/02(火) 11:57
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.