Henry는 워크 시트 사본이 인쇄 될 때마다 증가하는 숫자를 셀에 포함하려고합니다. 따라서 셀에 숫자 9가 포함되어 있고 워크 시트의 복사본 13 개를 인쇄하는 경우 각 복사본에는 해당 셀에 9, 10, 11까지의 숫자가 포함됩니다.

짐작할 수 있듯이 이것은 매크로를 사용하는 것이 가장 좋습니다. 수행해야 할 작업은 워크 시트를 인쇄하는 것 뿐이지 만 여러 번 인쇄 할 때마다 셀의 값을 늘려야합니다. 이 경우 증가 할 셀이 B7이라고 가정하겠습니다. 다음 매크로는 프로세스를 처리합니다.

Sub PrintNumberedCopies()

Dim iCopies As Integer     Dim J As Integer     Dim r As Range

' Specify the cell to modify     Set r = Range("B7")



' Get the number of copies.

iCopies = Val(InputBox("Number of copies to print:"))



If iCopies > 0 Then         ' Loop iCopies times, printing once per loop         For J = 1 to iCopies             ActiveSheet.PrintOut             r.Value = r.Value + 1         Next J     End If End Sub

매크로는 사용자에게 인쇄 할 사본 수를 묻고 각 사본을 개별적으로 인쇄합니다. 각 출력 후 B7 셀에 저장된 값이 증가합니다. 사용자가 여러 부수로 번역되지 않는 내용을 입력하면 아무것도 인쇄되지 않습니다.

B7의 값 번호를 항상 최신 상태로 유지하려면 마지막 인쇄 후 언젠가 통합 문서를 저장해야합니다. 또한이 매크로 이외의 다른 방법을 사용하여 인쇄하는 경우 B7의 값은 인쇄 된 실제 사본 수를 반영하지 않습니다.

_ 참고 : _

이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / excelribbon-ExcelTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (12135)은 Office 365의 Microsoft Excel 2007, 2010, 2013, 2016, 2019 및 Excel에 적용됩니다.