선생님..

차트/그래프
작성자
rpaq****
작성일
2020-10-21 13:32
조회
268

제가 이해력과 실력이부족해 계속 질문드리는점 죄송합니다...

선생님께서 알려주신 데이터추가 방법의경우 데이터분할하지않고 원래의 데이터셀의 차트에서

데이터추가로 할 수는 없는 것 입니까? 분할해도 일정부분만 겹쳐지고 다 안겹쳐집니다..

(겹쳐지는게아니라 옆으로 대칭이동한다해야하나....) 아예다른 숫자가붙는거같고..ㅠㅠ

첨부파일 차트데이터 1노랑 셀봐주십시오..ㅠㅠ

그리고 VBA알려주신 식으로하면

Option Explicit

Sub Test()

Dim cht As ChartObject
Dim rng As Range
Dim i As Long: Dim j As Long
Dim c As Variant

Set cht = Me.ChartObjects("차트")
Set rng = Me.Range("B10:G107")

For i = 1 To 933
For j = 1 To 6
Debug.Print rng.Cells(i, j).DisplayFormat.Interior.Color
Debug.Print cht.Chart.FullSeriesCollection(j).Points(i).Format.Fill.ForeColor
c = rng.Cells(i, j).DisplayFormat.Interior.Color
cht.Chart.FullSeriesCollection(j).Points(i).Format.Fill.ForeColor.RGB = RGB((c Mod 256), ((c \ 256) Mod 256), (c \ 65536))
Next
Next

End Sub

이게 제가첨부한 파일에 연동시키려면 맞는지요..? RGB는 또 어떻게 저렇게된건지..ㅠㅠ노랑파랑빨강회색초록 하려는데어떻게하면

되겠습니까..? 나름 검색해보고 연구해보다가안되서문의드립니다...

전체 3

  • 2020-10-24 01:09

    몇번을 읽어 보고 답변을 하기전에 질문을 정리해 보았습니다.
    원하시는 것이,

    1. 특정회차들을 묶었을 때, 각당첨번호가 몇번 나왔는지를 빈도로 보고 싶다.
    2. 이것을 챠트로 나타나게 하는데, 특정 번호 대역을 색상으로 나타내고 싶다.

     

    맞는지요?

    아래 이미지는 900~933회 까지를
    x축은 출현번호
    y축은 각 출현빈도
    색상은 10,20,30,40,45 로 다르게 표현해 본 것입니다.

    아직 구현한 것은 아닙니다.

     

    20201024_010849.png


  • 2020-10-25 06:24

    우와.....이정도 하려면 얼마나 걸릴런지요...부럽습니다...


  • 2020-10-21 16:42

    안녕하세요.

    데이터추가로 할 수는 없는 것 입니까? 분할해도 일정부분만 겹쳐지고 다 안겹쳐집니다..

    ==> 이 부분은 이전에 답변 드린바와 같이, 2차원 차트로 구현할 경우 원본 데이터를 수정하지 않는 이상 구현할 수 없는 부분입니다. ^^; 차트로 구현한다면 가장 근접한 방법으로 버블차트로 구현하거나 또는 X축 간격을 아주 좁게 좁혀서 하나의 선처럼 보이게 하는 방법 외에는 없을 것으로 보입니다.

    VBA의 경우 rng (범위)와 For문의 i, j값만 변경해주시면 됩니다. 행이 5~107인데, i로는 1~933을 넣어주셨네요. 1~102로 수정해보시길 바랍니다.

    여기에 대한 더 자세한 내용은, VBA 코딩 에대한 기본적인 내용이므로, 더 자세히 답변을 드리기에는 어려울 듯 합니다.^^; VBA 기초내용은 홈페이지의 VBA 기초정규강의를 참고하시거나 인터넷 관련 정보를 참고하면 큰 도움이 되실 듯 합니다.

    답변이 도움이 되셨길 바랍니다. 감사합니다.


전체 4,215
번호 카테고리 제목 작성자 작성일 추천 조회
4199 함수/공식
New 부품과 완제품 수량 연동 질문입니다. 첨부파일 (1)
receive | 17:54 | 추천 1 | 조회 11
receive 17:54 1 11
4198 VBA
New 시트별 셀수정 관련 질문드립니다 첨부파일 (1)
ehrud**** | 15:38 | 추천 0 | 조회 19
ehrud**** 15:38 0 19
4197 기능/도구
New 엑셀 추가기능 XFILTER를 사용한 파일이 XFILTER 가 설치되어있는 다른PC에서 열때 오류가 납니다.
No14 | 14:35 | 추천 2 | 조회 15
No14 14:35 2 15
4196 기능/도구
New 엑셀데이터유효성검사 질문입니다 꼭 도와주세용 첨부파일 (2)
하곰 | 14:20 | 추천 0 | 조회 25
하곰 14:20 0 25
4195 함수/공식
New 동적엑셀 서식 (1)
| 13:20 | 추천 0 | 조회 20
13:20 0 20
4194 함수/공식
New 합계 및 합수값 해결방법 첨부파일 (2)
kk**** | 12:52 | 추천 0 | 조회 23
kk**** 12:52 0 23
4193 VBA
New 특정날짜 데이터만 COPY 붙이기 첨부파일 (2)
H.B | 12:37 | 추천 0 | 조회 22
H.B 12:37 0 22
4192 함수/공식
New 강의실내용 교재로 받을수 있나요?
호반안개 | 11:11 | 추천 0 | 조회 28
호반안개 11:11 0 28
4191 함수/공식
New 월별 매출을 위해 서식을 짜고있습니다 첨부파일 (2)
크래용 | 10:23 | 추천 0 | 조회 35
크래용 10:23 0 35
4190 VBA
New ParseJSON 함수 자리차지 첨부파일 (3) 답변완료
하늘의 꿈 | 02:41 | 추천 0 | 조회 32
하늘의 꿈 02:41 0 32
4189 VBA
New vba listbox 에 head 추가하는 방법 (1)
서민철 | 2021.10.17 | 추천 0 | 조회 30
서민철 2021.10.17 0 30
4188 함수/공식
New 다품목 안전 재고 관리시 사용할 수 있는 함수 문의
엑셀왕왕초보 | 2021.10.17 | 추천 0 | 조회 27
엑셀왕왕초보 2021.10.17 0 27
4187 함수/공식
New importrange로 불러온 그림이 인쇄가 안됩니다..ㅠㅠ (2) 답변완료
민 쌤 | 2021.10.17 | 추천 0 | 조회 25
민 쌤 2021.10.17 0 25
4186 함수/공식
New 꼭 도와 주세요. 첨부파일 (3)
그린의달인 | 2021.10.16 | 추천 1 | 조회 61
그린의달인 2021.10.16 1 61
4185 함수/공식
New 공백 유지하는 중복 제거 문의 첨부파일 (4) 답변완료
clairebear8 | 2021.10.16 | 추천 0 | 조회 48
clairebear8 2021.10.16 0 48
4184 함수/공식
New 엑셀 공식 도와주세요~ 첨부파일 (1)
ma**** | 2021.10.16 | 추천 0 | 조회 55
ma**** 2021.10.16 0 55
4183
New 제가 만든 엑셀VBA가 오류들이 있어 도움을 청합니다. 첨부파일 (1)
유림아빠 | 2021.10.16 | 추천 0 | 조회 36
유림아빠 2021.10.16 0 36
4182 차트/그래프
New 이런 챠트도 가능한지요 (1)
| 2021.10.16 | 추천 0 | 조회 57
2021.10.16 0 57
4181 함수/공식
New 중복값 제거 및 특정조건을 만족하는 값만 표시 첨부파일 (4)
리부트짱가 | 2021.10.16 | 추천 0 | 조회 51
리부트짱가 2021.10.16 0 51
4180 VBA
New pdf파일저장 + 드롭다운 매크로 VBA 문의드립니다. 첨부파일 (1)
호두마루 | 2021.10.16 | 추천 1 | 조회 30
호두마루 2021.10.16 1 30
4179 기능/도구
다중조건을 다수의 셀에 입력하는 방법 (1)
seeking | 2021.10.15 | 추천 0 | 조회 40
seeking 2021.10.15 0 40
4178 함수/공식
같은 값끼리 같은 색을 적용하고 싶습니다 첨부파일 (6) 답변완료
유령회원 | 2021.10.15 | 추천 0 | 조회 40
유령회원 2021.10.15 0 40
4177 VBA
VBA로 날짜 입력하는데 형식이 날짜형실으로 바꿀수있을까요? (1)
박종만 | 2021.10.15 | 추천 0 | 조회 36
박종만 2021.10.15 0 36
4176 VBA
VBA에서 엑셀파일 여는 버튼을 만들었습니다. 첨부파일 (2) 답변완료
늘푸른2 | 2021.10.15 | 추천 0 | 조회 38
늘푸른2 2021.10.15 0 38
4175 VBA
살려주세욤.. 다중조건+중복제거 데이터유효성검사.. 첨부파일
지져스 | 2021.10.15 | 추천 0 | 조회 47
지져스 2021.10.15 0 47
4174 차트/그래프
차트 시간축 간격을 조정하는 방법 첨부파일 (1)
kimki**** | 2021.10.15 | 추천 0 | 조회 24
kimki**** 2021.10.15 0 24
4173 VBA
웹 크롤링 관련 문의 (2) 답변완료
숯검뎅이 | 2021.10.15 | 추천 0 | 조회 38
숯검뎅이 2021.10.15 0 38
4172 VBA
유저폼 리스트박스 검색 첨부파일 (2) 답변완료
007 | 2021.10.14 | 추천 0 | 조회 47
007 2021.10.14 0 47
4171 VBA
셀선택 관련 문의 드려요. (3) 답변완료
033cola | 2021.10.14 | 추천 0 | 조회 37
033cola 2021.10.14 0 37
4170 차트/그래프
특정 가로축을 강조하는 방법 및 세로축 단위 입력 방법이 궁금합니다. (3) 답변완료
sorryfo**** | 2021.10.14 | 추천 0 | 조회 29
sorryfo**** 2021.10.14 0 29