인쇄할 때마다 숫자 변경

인쇄할 때마다 숫자 변경

송장으로 사용하는 Excel 시트가 있습니다.

100페이지를 인쇄하고 싶고 송장 번호를 1에서 100으로 변경하여 각 용지마다 서로 다른 송장 번호를 갖게 하고 싶습니다.

어떻게 해야 하나요?

답변1

그러기 위해서는 매크로가 필요합니다. 다음 매크로를 찾아서 일부 변경했습니다. 올바르게 작동하는지 확인해보세요.

Sub PrintCopies_ActiveSheet()

Dim CopiesCount As Long
Dim copynumber As Long

CopiesCount = Application.InputBox("How many copies do you want?", Type:=1)
'Now the program wants you to input how many pages you like to print.
'You can input 100 here.

For copynumber = 1 To CopiesCount
With ActiveSheet
   .Range("E1").Value = copynumber 'I assume your invoice number is in cell E1.
   .PrintOut 'Print the sheet
End With
Next copynumber
End Sub

답변2

이 작업을 수행하는 내장된 쉬운 방법이 없는 것 같기 때문에 이 작업을 수행하려면 매크로를 사용하겠습니다. 매크로의 개요는 매우 간단합니다. 이런 성격의 것 :

  1. 복사본 수와 프린터 이름을 묻는 메시지
  2. 송장 번호 셀을 0으로 설정합니다.
  3. 복사본 수에 대한 루프
    1. 송장 셀 번호 증가
    2. 문서를 프린터 이름으로 인쇄

편집하다

이 페이지Word에 대한 예가 있으므로 이것을 Excel에 적용할 수 있습니다. 이 페이지Excel에 대한 대략적인 예가 있습니다

관련 정보