No.5ベストアンサー
- 回答日時:
2010でも手作業でできるみたいですので恐らく2013でも可かと
http://sakurahirosi.hatenablog.com/entry/2015/09 …
> .AxisGroup = 2
> .Format.Line.Visible = msoTrue
> .AxisGroup = 1
この手順を手作業でやればエラー出なかったですね
1.追加した系列を一旦第2軸にセットして
2.「線なし」ではなくて色など設定して
3.主軸にセットし直す
追加系列全て第2軸に設定して、主軸と目盛合わせる事でも良いかと思います
No.4
- 回答日時:
Office365Ver16.0です
このVerだと手作業でできるんですよね
下位VerはVBAになるのかな?
それにしても6本は厳しいかも
それに折れ線と積み上げ折れ線を追加はできないかもですね
一応Excel2010でやってみました
例えば株価チャートの元データ範囲がA1:E21
追加するデータ範囲がF1:K21とします
Sub test1()
Dim c As Chart
Dim r As Range
Dim rc As Range
Dim rr As Range
Dim i As Long
With ActiveSheet
'とりあえずActiveSheetの1個目のChart
Set c = .ChartObjects(1).Chart
'横軸
Set r = .Range("A2:A21")
'見出し行
Set rc = .Range("F1:K1")
'追加データ範囲
Set rr = .Range("F2:K21")
End With
With c.SeriesCollection
For i = 1 To 6
With .NewSeries
'↓なくてもOKだと思う
'.ChartType = xlLine
.Name = rc(i)
.Values = rr.Columns(i)
.XValues = r
'追加系列を一旦第2軸にセット(2Loop以降は不要だがあってもOK)
.AxisGroup = 2
.Format.Line.Visible = msoTrue
'主軸に戻す
.AxisGroup = 1
End With
Next
End With
End Sub
2010だと6系列追加では時々エラーが出てしまいますね
安定しないからおすすめできないかもしれません
No.3
- 回答日時:
> 上のチャートは ロウソク足で 他のチャートと共存できません(??)
株価チャートの事ですか?
項目軸が共通の場合、系列追加は可能です
項目軸がそれぞれ違う場合は難しいですが
違うものを重ねても効用はないと思われるので、共通だと推測してます
それぞれのチャートの種類はなんでしょうか
恐縮です。当方 エクセル 2013Ver 。
ネット検索でヒットしたサンプルもそうなっているのですが、記事が古いのか Verも 古いです。
ロウソク足選択すると 他のグラフと共通で使えないって、表示が出るものですから・・・、でも、
見せて頂いてる回答のグラフは完成形ですよねえ・・・
軸項目はお説の通り、共通です(株価と時間軸)
ろうそく足以外は、基本折れ線(6本 一目均衡グラフ)です。その中、2本が、折れ線というか積み上げでカラーをつけています、でもベース折れ線ですから
お手すきでしたら、エクセルのVerを お教え願えれば幸いです。
感謝
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
- ・ゆるやかでぃべーと タイムマシンを破壊すべきか。
- ・歩いた自慢大会
- ・許せない心理テスト
- ・字面がカッコいい英単語
- ・これ何て呼びますか Part2
- ・人生で一番思い出に残ってる靴
- ・ゆるやかでぃべーと すべての高校生はアルバイトをするべきだ。
- ・初めて自分の家と他人の家が違う、と意識した時
- ・単二電池
- ・チョコミントアイス
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ウェブページから手軽にスクレ...
-
VBAでアクセスDBからデータの取...
-
Excel VBAでグループ毎に集計す...
-
【C#】textBoxの指定行のデータ...
-
「Nullの使い方が不正です」の...
-
VB6.0 テキストボックス マル...
-
部品表
-
リスト内のアイテム並び替えに...
-
アクセスでウェブ上のデータを...
-
VBA 重複しない名称単位で集計
-
Excel VBA で日付を4ケタの数値...
-
MSFlexGrid 行選択状態
-
COBOL数値転記の仕様
-
VBA 変数名に変数を使用したい。
-
エクセルでXY座標に並べられた...
-
Accessで別mdbのテーブルをコピー
-
配列のペースト出力結果の書式...
-
C#でbyte配列から画像を表示さ...
-
手動または分散トランザクショ...
-
VB6のテキストボックスに入力し...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAでアクセスDBからデータの取...
-
【C#】textBoxの指定行のデータ...
-
「Nullの使い方が不正です」の...
-
C# DataTableに最後に追加した...
-
XMLでデータとして画像を指定す...
-
VBAコンボボックスの内容が反映...
-
Excel VBAでフォルダ内の全テキ...
-
COBOL数値転記の仕様
-
エクセルのセル最終行取得
-
ListViewで表示されたデータの...
-
MSFlexGrid 行選択状態
-
【VB.NET】Excelの最終行までの...
-
アクセスでウェブ上のデータを...
-
【ExcelVBA】値を変更しながら...
-
クリスタルレポートでレコード...
-
ADODBでの行番号の取得、もしく...
-
Excel VBAでグループ毎に集計す...
-
VB webデータの取得
-
VB2010で、選択した系列を最前...
-
エクセルのCSV読み込みについて
おすすめ情報
お説 すべて確認しました。
お世話様でした。
感謝