| |
ビール腹子 さん、こんばんわ。
>Set chtobj = ActiveSheet.ChartObjects.Add(Cells(RowPos, Col_No + 2).Left, Cells(RowPos, Col_No).Top, 350, 150)
>と場所を指定をしているにも関わらず、上のほうはちゃんと基にしている表の横にできるのですが、下のほうに行くに連れてどんどんグラフの場所が表とずれて出てきます。
>これって、しょうがないことなのでしょうか??
>
>どなたか、教えていただけませんか?
グラフを追加する前にセルに移動してみてください。
<<略>>
Application.Goto Cells(RowPos, 7),True
> Set chtobj = ActiveSheet.ChartObjects.Add(Cells(RowPos, 7).Left, Cells(RowPos, 7).Top, 200, 100)
> With chtobj.Chart
> .SetSourceData Source:=Range(Cells(RowPos, 20), Cells(RowPos + i, 20 + m))
<<略>>
|
|