|
:: 게시판
:: 이전 게시판
|
이전 질문 게시판은 새 글 쓰기를 막았습니다. [질문 게시판]을 이용바랍니다.
통합규정 1.3 이용안내 인용"Pgr은 '명문화된 삭제규정'이 반드시 필요하지 않은 분을 환영합니다.법 없이도 사는 사람, 남에게 상처를 주지 않으면서 같이 이야기 나눌 수 있는 분이면 좋겠습니다."
09/09/25 14:27
원하시는 내용을 정확히 인지했는지는 모르겠지만.
매크로 편집기를 이용해서 For문을 사용하시면 될 것 같습니다. 만약 A1:C1 data로 하나의 챠트를 만들고 A2:C2 ~ A1000:C1000 까지 1000개의 챠트를 만드신다고 하시면 Sub Macro1() ' ' Macro1 Macro ' 김정환이(가) 2009-09-25에 기록한 매크로 ' ' 바로 가기 키: Ctrl+w ' For a = 1 To 1000 Charts.Add ActiveChart.ChartType = xlColumnClustered ActiveChart.SetSourceData Source:=Sheets("sheet1").Range("A" & a & " :C" & a & " "), PlotBy:= _ xlRows ActiveChart.Location Where:=xlLocationAsObject, Name:="sheet1" Next a End Sub 이런식으로 하시면 될 것 같습니다.
09/09/25 14:31
매크로 VBA는 일단 1개의 챠트를 만드는 과정을 매크로로 기록하시고,
그 매크로를 VBA 편집기를 통해서 For a = 1 To 1000 추가 Range("A" & a & " :C" & a & " ") range 부분의 기존 숫자를 " & a & " 로 수정 Next a 추가 하시면 됩니다.
|
||||||||||