VBA 교차 테이블 사전 통계

Sub? Ss ()

암담한가? MyRows 1? 무엇으로? 길다

암담한가? 복숭아나무 2? 무엇으로? 길다

암담한가? 내 까마귀 3? 무엇으로? 길다

암담한가? 내 까마귀 4? 무엇으로? 길다

암담한가? Name 1? 무엇으로? 선

암담한가? 이름 2? 무엇으로? 선

암담한가? 이름 3? 무엇으로? 선

암담한가? 내 데이터? 무엇으로? 단일

무엇을 사용합니까? 엑셀. 응용 프로그램. 활성 워크북

내 까마귀 4? =? 1

내 까마귀 3? =? 셋；삼；3

뭐해? 언제? 。 용지 ("용지 3"). 세포 (MyRows3,? 1)? & lt& gt? ""

Name 1? =? 。 용지 ("용지 3"). 세포 (MyRows3,? 1)

이름 2? =? 。 용지 ("용지 3"). 세포 (MyRows3,? 2) 을 참조하십시오

복숭아나무 2? =? 셋；삼；3

이름 3? =? ""

뭐해? 언제? 。 용지 ("용지 2"). 세포 (MyRows2,? 1)? & lt& gt? ""

만약? 。 용지 ("용지 2"). 세포 (MyRows2,? 1)? =? Name 1? 그리고는요. 。 용지 ("용지 2"). 세포 (MyRows2,? 2)? =? 이름 2? 그리고 나서

이름 3? =? 。 용지 ("용지 2"). 세포 (MyRows2,? 3) 을 참조하십시오

종료? 하다

끝? 만약

복숭아나무 2? =? 복숭아나무 2? +? 1

고리

만약? 이름 3? & lt& gt? "? 그리고 나서

내 데이터? =? -999.999

MyRows 1? =? 셋；삼；3

뭐해? 언제? 。 용지 ("용지 1"). 셀 (MyRows 1,? 1)? & lt& gt? ""

만약? 。 용지 ("용지 1"). 셀 (MyRows 1,? 1)? =? Name 1? 그리고는요. 。 용지 ("용지 1"). 셀 (MyRows 1,? 2)? =? 이름 3? 그리고 나서

내 데이터? =? 。 용지 ("용지 1"). 세포 (MyRows2,? 3) 을 참조하십시오

종료? 하다

끝? 만약

MyRows 1? =? MyRows 1? +? 1

고리

끝? 만약

만약? 내 데이터? & lt& gt? -999.999 요? 그리고 나서

내 까마귀 4? =? 내 까마귀 4? +? 1

。 용지 ("용지 4"). 세포 (MyRows4,? 1)? =? Name 1

。 용지 ("용지 4"). 세포 (MyRows4,? 2)? =? 이름 2

。 용지 ("용지 4"). 세포 (MyRows4,? 3)? =? 이름 3

。 용지 ("용지 4"). 세포 (MyRows4,? 4)? =? 내 데이터

끝? 만약

내 까마귀 3? =? 내 까마귀 3? +? 1

고리

끝? 따라

끝? 잠수함