マクロにてグラフを複数作成しようと考えています
しかし、ループを使用してグラフを作成すると
1つ以上の場合エラーになってしまい作成できません
どのように作成したらよいのでしょうか?
2つ目以降のグラフObjectの名前が重なるからエラーになるとか、そういう部分での問題でしょうか?
-------------------------------------
Sub Graph
For i = 1 To 2 'source_cnt
Call Make_Graph(引数)
Next
End Sub
-------------------------------------
Sub Make_Graph(引数)
With ActiveSheet.ChartObjects.Add( _
Left:=Range(***).Left, _
Top:=Range(***).Top, _
Width:=Range(***).Width, _
Height:=Range(***).Height)
.Chart.ChartType = xlRadar
.Chart.SetSourceData Source:= Range(***), PlotBy:=xlColumns
.Chart.Location Where:=xlLocationAsObject, Name:=WorkSheet.Name
.Chart.HasLegend = False
End With
-------------------------------------
No.1ベストアンサー
- 回答日時:
標準モジュールに、質問のコードを一部手直しして、下記にして貼り付け実行しました。
2つレーダーチャートを描きましたが。後はご自分で改良してください。
Dim i
Sub Graph()
For i = 1 To 2 'source_cnt
Call Make_Graph
Next
End Sub
Sub Make_Graph()
With ActiveSheet.ChartObjects.Add( _
Left:=Cells(2, i * 5).Left, _
Top:=Cells(2, i * 5).Top, _
Width:=200, _
Height:=300)
.Chart.ChartType = xlRadar
.Chart.SetSourceData Source:=Range(Cells(1, 1), Cells(10, i)), PlotBy:=xlColumns
'.Chart.Location Where:=xlLocationAsObject, Name:=Worksheet.Name
.Chart.HasLegend = False
End With
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- PowerPoint(パワーポイント) ExcelのVBAコードについて教えてください。 3 2022/05/25 14:32
- Excel(エクセル) EXCELのグラフを画像(JPG形式)で保存、通常実行がうまく行かない。ステップインはうまく行く 3 2022/08/30 12:06
- Excel(エクセル) エクセルで同じ数字同士を自動で線で結ぶVBAを教えてください 6 2022/04/26 23:13
- Visual Basic(VBA) EXCEL VBAにて動的にCheckBOXを複数作成し、同BOXにイベントを追加したい 1 2023/03/16 07:05
- Visual Basic(VBA) 【VBA】Excelの特定範囲のセルを画像で保存したい 2 2023/01/25 13:06
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2022/05/26 17:19
- Excel(エクセル) Excelのマクロについて教えてください。 4 2022/05/31 14:07
- Visual Basic(VBA) VBAプログラミング 2 2022/11/27 12:07
- Visual Basic(VBA) ExcelVBAのマクロについて。 9 2022/05/04 14:50
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA PDFで保存するマクロで実行...
-
Windowsコマンドプロンプトのmo...
-
MySQLにて、SQLファイルの実行...
-
vb.netによるアプリが動かなく...
-
Excel VBAでグラフを移動させる...
-
Latexでコンパイルはできるがdv...
-
EasyTeXのエラーメッセージにつ...
-
Windowsの古いゲーム(32bit OS...
-
インストールした覚えがないア...
-
macでDocuWorks を使うのは無理?
-
Microsoftアカウントのユーザー...
-
Windows11のインストール入れ替え
-
manが使用できません。
-
焼いたDVDが最後の方で止まります
-
Cyberduckのアンインストール
-
Mac 保存場所について
-
古いPCにAndroid x86をインスト...
-
puttyのロギングについて
-
Windows updateでエラーコード8...
-
MacBookにOfficeソフトを入れる...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Windowsコマンドプロンプトのmo...
-
MySQLにて、SQLファイルの実行...
-
VBA PDFで保存するマクロで実行...
-
リンクエラーの修正法を教えて...
-
Visual Studio のエディタの動...
-
VBA グラフを複数作成する場合
-
デザイナ表示が出来ません
-
Excel VBAでグラフを移動させる...
-
VB6.0とVB.NETの違いについて
-
ポインタと整数との比較を行な...
-
Latexでコンパイルはできるがdv...
-
テキストエディタatomの日本語化
-
コマンドプロンプト(Pingコマ...
-
VBで作成したEXEが使用している...
-
EasyTeXのエラーメッセージにつ...
-
vb.netによるアプリが動かなく...
-
メビウスリング掲示板という サ...
-
自分のコーディングを判定して...
-
EclipseのTomcatがライブラリを...
-
VScodeでステップ実行が出来ない
おすすめ情報