엑셀로 자동추첨 프로그램을 만들고 싶습니다. (다음은 컴퓨터 신문에 소개된 내용입니다. 왜 제 컴퓨터에서 조작이 실패했는지 모르겠습니다.)

부울 Dim 플래그

보조 AAA 레벨 ()

셀을 범위로 어둡게 하기

표기할 때까지 만들다

범위 ("C6:G 10"). 셀 (Int(Rnd() * 25)+1). 고르다

여러 활동

고리

플래그 = false

끝단 접합

하위 BBB ()

플래그 = 참

끝단 접합

Excel 로 돌아가서 25 개의 레이블을 입력합니다. G 10 (코드의 굵은 글씨는 실제 상황에 따라 수정됨), 상자, "추첨", "일시 중지" 와 같은 두 개의 그래픽을 삽입합니다. 첫 번째 상자를 마우스 오른쪽 단추로 클릭하고 다음을 지정합니다 두 번째 상자를 마우스 오른쪽 버튼으로 클릭하고 매크로 BBB 를 지정합니다.

해봐.