현재 위치 - 주공해몽공식사이트 - 랜덤 번호 뽑기 점술 - Word 가 자동으로 숫자를 생성하는 방법 Word 는 자동으로 숫자를 생성합니다.

Word 가 자동으로 숫자를 생성하는 방법 Word 는 자동으로 숫자를 생성합니다.

VBA 를 사용하여 Alt+F 1 1 을 눌러 열고, 새 모듈을 삽입하고, 코드를 입력합니다. 숫자 000 1 을 처음 인쇄할 때와 같이 인쇄 시 숫자를 누적시킬 수 있습니다. 두 번째 인쇄 시에는 0002 가 되어 9999 로 누적됩니다. 코드는 다음과 같습니다.

Sub? 보통 숫자 ()

`

`

`

`

암담한가? 나? 로? 정수

암담한가? 디? 로? 정수

열어? 잘못? 이력서? 그리고 나서

나? =? InputBox ("시작 번호를 입력하십시오", "시작 번호" 1)? -응? 1

디? =? InputBox ("인쇄 매수를 입력하십시오.",? "인쇄 매수"? 1)

뭐 때문에? 디? =? 1? 어디 가? 디? 한 걸음? 1

나? =? 나? +? 1

만약? 나? & gt=? 1000? 그리고 나서

선택。 백스페이스를 입력합니다

선택。 백스페이스를 입력합니다

선택。 백스페이스를 입력합니다

선택。 백스페이스를 입력합니다

선택。 텍스트를 입력하시겠습니까? 본문: = 나

ActiveDocument 인쇄 출력

기타

만약? 나? & gt=? 100? 그리고 나서

선택。 백스페이스를 입력합니다

선택。 백스페이스를 입력합니다

선택。 백스페이스를 입력합니다

선택。 백스페이스를 입력합니다

선택。 텍스트를 입력하시겠습니까? 본문: ="0 "? & amp? 나

ActiveDocument 인쇄 출력

기타

만약? 나? & gt=? 10? 그리고 나서

선택。 백스페이스를 입력합니다

선택。 백스페이스를 입력합니다

선택。 백스페이스를 입력합니다

선택。 백스페이스를 입력합니다

선택。 텍스트를 입력하시겠습니까? 본문: ="00 "? & amp? 나

ActiveDocument 인쇄 출력

기타

선택。 백스페이스를 입력합니다

선택。 백스페이스를 입력합니다

선택。 백스페이스를 입력합니다

선택。 백스페이스를 입력합니다

선택。 텍스트를 입력하시겠습니까? 본문: ="000 "? & amp? 나

ActiveDocument 인쇄 출력

끝? 만약

끝? 만약

끝? 만약

다음? 디스프로슘

끝? 잠수함