Excel VBA質問箱 IV

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

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


4318 / 76734 ←次へ | 前へ→

【78039】Re:マクロでグラフ作成
発言  のりっぺ  - 16/3/13(日) 9:43 -

引用なし
パスワード
   ▼γ さん:
>こんにちは。
>
>そのコードはどこから持ってきたものですか?
>その説明をしてください。
>SheetとかLCとかSCとかはどのように設定されたもの?
>そういうセル範囲を指定しているんでしょう、としか言えない。
>
>あなたの目的(数値がどこに配置されていて、どのような種類のグラフを
>書こうとしているのか)を説明するのが先決でしょう。
>そして、マクロ記録をしてみるのが、最上の方法でしょう。


>>返答ありがとうございます。
コードは作成依頼したものです。
それを参考に自分でアレンジしたかったのですが、
依頼すると有料ですので・・・

説明不足でしたね申し訳ございません。
5つの項目について指定期間の折れ線グラフを作成するものです。

グラフに関する記述はシートの5つの列の指定範囲のグラフを表して
居るものだと思いますが私には分かりません。

以下の範囲で説明が出来るようでありましたらお願い致します。

'グラフ作成

  Dim i As Long, SC As Long, LC As Long, CL As Long
  SC = StartCell
  LC = LastCell
  
    
  '作画
 
   With ActiveSheet.ChartObjects(1).Chart
    For i = 1 To .SeriesCollection.Count
    .SeriesCollection(i).Formula = _
    "=SERIES(" & sheet & "!R6C" & i + 41 & ":R7C" & i + 41 & "," & sheet & "!R" & SC & "C1:R" & LC & "C1," & sheet & "!R" & SC & "C" & i + 41 & ":R" & LC & "C" & i + 41 & "," & i & ")"
    Next i
  End With
End Sub

10 hits

【78037】マクロでグラフ作成 のりっぺ 16/3/12(土) 22:56 発言[未読]
【78038】Re:マクロでグラフ作成 γ 16/3/13(日) 7:21 発言[未読]
【78039】Re:マクロでグラフ作成 のりっぺ 16/3/13(日) 9:43 発言[未読]
【78040】Re:マクロでグラフ作成 γ 16/3/13(日) 12:07 発言[未読]
【78041】Re:マクロでグラフ作成 のりっぺ 16/3/13(日) 18:27 お礼[未読]
【78042】Re:マクロでグラフ作成 γ 16/3/13(日) 19:03 発言[未読]
【78043】Re:マクロでグラフ作成 のりっぺ 16/3/13(日) 19:25 お礼[未読]
【78044】Re:マクロでグラフ作成 マナ 16/3/13(日) 20:28 発言[未読]
【78045】Re:マクロでグラフ作成 のりっぺ 16/3/13(日) 22:11 質問[未読]
【78046】Re:マクロでグラフ作成 マナ 16/3/13(日) 22:45 発言[未読]
【78047】Re:マクロでグラフ作成 のりっぺ 16/3/13(日) 23:08 お礼[未読]

4318 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free