본문 바로가기

엑셀 & VBA

1-7 숫자야구 게임 완성하기 (한셀/VBA)

 한셀에도 엑셀처럼 코드를 짤 수 있는 기능이 있습니다.  이름은 엑셀과는 다르게 VBS(Visual basic script)라고 부른다고 합니다. 

스크립트 편집기

 도구 - 매크로 - 스크립트 편집기(C)를 누르거나, Alt + F11로 들어갈 수 있습니다.

 

모듈 삽입
모듈 실행

 모듈 삽입을 하고 Module에 들어가줍니다.

이제 여기다가 코드를 입력하면 됩니다. 코드는 엑셀에서 사용한 코드와 거의 동일합니다. 한셀의 VBS의 경우 엑셀과는 다르게 RandBetween 함수를 사용할 수 있습니다.

 

Sub main()

Range("B5:B14").Select
Selection.ClearContents
Range("B5").Select

Do '중복되는 숫자를 없애기 위함

a = RandBetween(123, 987)
Cells(1, 1) = a

Loop Until Cells(2, 6) = 0

End Sub

 

코드

 한셀에서도 마찬가지로 상자를 생성하고 매크로를 지정해주면 게임이 완성됩니다.

상자 삽입
매크로 지정
숫자야구.cell
0.01MB