• ベストアンサー

複数のデータ系列の線の太さを変えたい

Excelの折れ線グラフやレーダーチャートで、複数のデータ系列の線の太さを一括で変えたいのですが出来ないのでしょうか？ 右クリックして「データ系列の書式設定」を使っても１つずつしか変えられませんでした。

質問者が選んだベストアンサー

  • ベストアンサー
  • mitarashi
  • ベストアンサー率59% (574/965)
回答No.2

マクロでやる事例です。グラフ上をクリックして選択状態にした後、マクロを実行してください。 Sub test() Dim i As Long Application.ScreenUpdating = False On Error Resume Next '存在しない系列を指定してエラーで止まるのを防止 For i = 1 To 100 '100系列も無いと思うので適当な数字に変更して下さい ActiveChart.SeriesCollection(i).Select With Selection.Border .Weight = xlThick　'線の太さ End With Next i Application.ScreenUpdating = True End Sub 自動記録マクロを若干手直ししたものです。線の太さには、 XlHairline,XlMedium,XlThick,XlThin などがあります。

Varese
質問者

お礼

うまくいきました！ ありがとうございます。

その他の回答 (1)

  • koko88okok
  • ベストアンサー率58% (3839/6543)
回答No.1

１系列しか選択できないので、一括では変えられないみたいです。 少し手間を省くには、次の系列を選択して「F4」キー（前と同じ）を押すと、同じ線の太さに変更されます。 この「F4」キーは、ExcelだけでなくWordなどでも有効です。

Varese
質問者

お礼

やっぱり一括で変える機能はないんですね。 ありがとうございます。

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. オフィス系ソフト

関連するQ&A

  • EXCEL2000　グラフの書式設定について

    いつもお世話になっています。 EXCEL2000を使ってグラフのレーダーチャートを作成しました。 そのレーダチャートの「データ系列」の書式設定の仕方について教えてください。 たとえば、全てのデータ系列の線の太さを太くしたいとき、 一度に設定することはできないでしょうか？ 私のやり方だと、１つ１つの系列をダブルクリックして書式設定をだしてやっていて、系列が多くなると大変になってきます。 一度に、一気に、書式の変更ができるのでしたら、やり方を教えてください。 よろしくおねがいします。

  • Excel2007のデータ系列

    Excel2007でグラフのマーカーの種類を変更したいのですが データ系列を右クリックしてデータ系列の書式設定で変えればいいと テキストに載っていたあったのですがデータ系列がどれのことか分かりません。 あちこち右クリックしたのですが分かりませんでした。 データ系列とは画面のどのあたりにあるのでしょうか。 よろしかったら教えてください。

  • EXCEL折れ線グラフの線を一気に消したい

    EXCEL2003で折れ線グラフを作成しました。 グラフ上に折れ線が22本（系列が22）あります。 データ系列の書式設定で「線」を「なし」、「マーカー」を「●」にしたいです。 系列を1つ1つ選択して変更するのではなく、一気に変更する方法はありませんでしょうか？

  • 折れ線グラフのデータ系列のポイント時に疑問です。

    初心者です。勉強中ですので、どうしようもない相談ですみません。 (1)1月～１２月までの売上合計折れ線グラフを作成したとします (2)一つのデータ系列のみ、値を付けたいと思います。 (3)９月のみ、データの値をグラフ上につけるため、まずは、折れ線グラフ全体を クリックしました。→折れ線グラフの全ての売上合計のデータ系列に■がつきました。 (4)その後、９月のみなので、９月のデータ系列の■の所のみ、クリックした所、 ８月にも■のハンドルがつきました。 なぜでしょうか。同じような事を折れ線グラフですると、同じく希望の月の一つ前の月の データ系列も■がつきます。 しかしながら、棒グラフ、横棒グラフなどはつきません。 やはり、折れ線グラフは、前月から線を引っ張ってくるのでこうなるのでしょうか。 すみません、よろしくお願い致します。

  • エクセルグラフ　データケーブル・系列の入れ替え

    前回質問・回答済のもので、新たに質問いたします。 グラフ作成で、 系列が、 （系列１）売上、（系列２）粗利 横軸が、 （左）新しい年　⇒⇒⇒（右）古い年 となってしまうものを、 前回教えてgooで質問した所、 ”グラフのX軸を右クリックして、書式設定を選んで、 目盛タブをクリックして、その中にあるチェックボックス３つ 　項目境界で交差する 　軸を反転する 　最大項目でY/数値軸と交差する” と、教えて頂き、見事、 横軸 （左）古い年　⇒⇒⇒（右）新しい年 棒グラフ上 （左）（系列１）売上 （右）（系列２）粗利 で成功致しましたが、 それに、「データテーブルを表示する」をチェックすると、 データテーブルの系列 （上）（系列２）　粗利 （下）（系列１）　売上 となってしまいます。 これを、 データテーブルの系列 （上）（系列１）　売上 （下）（系列２）　粗利 としたいのですが、 どの様にすれば良いでしょうか？ 説明が下手くそで誠に申し訳ありませんが、 宜しくお願い致します。 【前回の質問】 変なタイトルでわかりづらくて大変申し訳ありませんが、 エクセルのグラフで、 縦の棒グラフを使って年間別の売上を作っております。 横軸が、（左）新しい年　⇒⇒⇒（右）古い年 になってしまいます。 その逆の　（左）古い年　⇒⇒⇒（右）新しい年 にしたいのですが、 (1)データをいじらず、逆にすることは出来ますか？ （例えば、系列の順序を変更する時に データ系列の書式設定→系列の順序　ように変更する場所があれば。） (2)やはり、元のデータを並び替えなければならないのでしょうか？ 因みに、エクセルのバージョンは、EXCEL 2003　です。 宜しくお願い致します。 【前回；回答者からのコメント】 グラフのX軸を右クリックして、書式設定を選びます。 目盛タブをクリックして、その中にあるチェックボックス３つ 　項目境界で交差する 　軸を反転する 　最大項目でY/数値軸と交差する のすべてにチェックを入れてみてください。 私が実験してところではこれで出来ました。

  • VB2010で、選択した系列を最前面に表示させたいのですが、

    VB2010で、選択した系列を最前面に表示させたいのですが、 どなたかご存知ないでしょうか？ チャートコントロールに描いたグラフ線をクリックすると、 何番目の系列をクリックしたのか取得するところまでできました。 複数の折れ線グラフが重なっていて見にくいので、 クリックしたグラフを最前面に表示させたいのですが、 Seriesで順序並べ替えのようなものが見つかりません。 どなたかご存知でしたら教えてください。 よろしくお願いします。

  • エクセル　グラフ　時系列データを逆順に

    時系列データを折れ線グラフにすると、 通常は、データの上の数値から、グラフは左から右に作成されると思います。 その順番を、右から左に変更したいと考えています。 ※ただし、グラフ化前の表自体を、ソートするのは避けたいです。 グラフ内で変更することは、できますでしょうか？ 宜しくお願いいたします。エクセル２０１３を使用しています。

  • エクセルグラフ（charat)のマーカーの変更はどうするのですか？

    初歩的な質問ですがよろしくお願いします。 エクセルで折れ線グラフを作成した後、ライン（線）とプロット（マーカー）を変更しようとラインを指定して右クリックしました。「データ系列の書式設定」をさらにクリックすると「線」と「マーカー」が表示されます。ここででライン（線）の変更はできるのですが、「マーカー」については全く変更ができません。マーカーの変更（形、色）にすいては、どうすればいいのでしょうか。ご教示願います。

  • エクセル2003　折れ線グラフの表示について教えて下さい！

    エクセル2003で、縦棒グラフと折れ線グラフの複合グラフを作成しています。 折れ線グラフで、マーカーのみが表示され、線が表示されません。 データ系列の書式設定の中の「パターン」で、線の項目で指定しても表示されない状態です。 棒グラフが2本、折れ線グラフ4本を作成したいのですが、何か問題があるのでしょうか。

  • Excelの折れ線グラフの線をマクロから削除したい

    いつも楽しく勉強させていただいております。 OSはWin7でOffice365です。 Excelマクロはまだまだ勉強中です。 Excelシート上の折れ線グラフの線をマクロから削除したいのですが、どうしてもできません。 前提として６本線の折れ線グラフがあります。 データによってはグラフの線は６本以下のことがあります。 その場合は不要なグラフの線を消したいのです。 そこでグラフを右クリックし、[データソースの選択]ダイアログで削除したい系列を削除して、それをマクロ記録しました。 Sub Macro2() ActiveSheet.ChartObjects("グラフ 146").Activate ActiveChart.FullSeriesCollection(6).Delete End Sub これを参考に下記のマクロを書きました。 Sub d() Dim a As ChartObject Dim b As Chart Set a = ActiveSheet.ChartObjects(1) Set b = a.Chart b.FullSeriesCollection(6).Delete End Sub ところが最後の行で「実行時エラー1004 パラメータが無効です」になって異常終了してしまいます。 デバッガを使って調べると b.FullSeriesCollection.Countが3になており、 b.FullSeriesCollection(3).Deleteつまり三つ目の系列なら削除することができます。 しかし最大６個の系列のうち、後ろの方から削除したいのでこれでは困ってしまいます。 どうしたらいいでしょうか。 なぜ系列は６個なのに３個にされてしまうのでしょうか。 ちょっと引っかかるのが[データソースの選択]ダイアログで「データ範囲が複雑すぎるため表示できません」と言われることです。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する