Vba 프로그래밍을 이해하는 새우를 도와주세요. 나는 작은 프로그램을 가지고 있는데, 클릭 한 번으로 끝까지 자동으로 실행할 수 있기를 바란다.

또는 서브루틴을 추가하십시오.

석개제도

I = 9 ~ 0 단계-1

Wt = 1

Wt & gt0. 1

Ra = Int(Rnd() * 10)

시나리오 ra 를 선택합니다

시나리오 0

셀 (1, 2). 고르다

사례 1

셀 (1, 1). 고르다

사례 2

셀 (2, 1) 입니다. 고르다

사례 3

셀 (3, 1) 입니다. 고르다

시나리오 4

세포 (3, 2). 고르다

사례 5

세포 (3, 3). 고르다

사례 6

세포 (3, 4). 고르다

사례 7

세포 (2, 4). 고르다

사례 8

셀 (1, 4). 고르다

사례 9

셀 (1, 3). 고르다

선택을 마치다

신청하다. 대기 (현재+시간 값 ("0:00:0 1") * wt)

Wt = wt * 0.8 입니다

고리

C =11-i.

셀 (c, 7) = i.

내 msgbox ""& "몇 초 남았어요"& "-"& 나, 1, "힌트", 64

그리고 나서

끝단 접합

Sub my msgbox (내 프롬프트는 문자열, 시간은 정수, 내 제목은 문자열, 버튼은 정수)' 대화 상자를 자동으로 닫습니다.

CreateObject("Wscript. 셸) 을 참조하십시오. 내 힌트, 시간, 내 제목, 버튼을 팝업한다

끝단 접합