다음을 통해 공유

엑셀 넘버링, 다음 인쇄할 때 이전 넘버에 이어서 할 수 있나요?

익명
2016-06-13T21:37:31+00:00

Sheet2 에서

인쇄할 때마다 머리부분에 해당하는 셀에 (A1, A3)

고유일련번호가 인쇄되도록 하고 싶습니다.

문제는 종료 후 다시 파일을 열었을 때 직전 인쇄된 넘버링

다음부터 이어서 할 수  없다는 데 있습니다.

인쇄할 넘버링이 2000개여서 한번에 할 수가 없고 몇 일에 나눠서 인쇄해야 합니다.

검색으로 알아보았는데  인쇄 횟수 카운트를 저장할 수 없다고 하는데요

가능할까요?


Sub 인쇄하기()

  Dim J As Integer

  J = InputBox("몇장인쇄 할까요?")

    For J = 1 To J

       Worksheets(2).Range("A1") = Worksheets(1).Cells(2 * J, 2)

       Worksheets(2).Range("A3") = Worksheets(1).Cells(2 * J + 1, 2)

       ActiveWindow.SelectedSheets.PrintOut

    Next

 End Sub


위 VBA 는 검색으로 찾은 것입니다.

인쇄 종류 후 다음에 인쇄할 때 이어서 하려고 합니다.

정확한 방법을 알려주시면 감사하겠습니다.


sheet1 입니다.

번호 고유일련번호
1 rMC6324
2 Zyc4153
3 zfZ8423
4 zXE9429
5 kes7565
6 bHj4585
7 MFT3769

sheet2 입니다.

고유일련번호1
안내문 서식
고유일련번호2
안내문 서식
Microsoft 365 및 Office | Excel | 가정용 | Windows

잠긴 질문. 이 질문은 Microsoft 지원 커뮤니티에서 마이그레이션되었습니다. 질문이 도움이 되었는지 여부에 대해 응답할 수는 있지만, 메모나 회신을 추가하거나 질문을 따를 수는 없습니다.

댓글 0개 설명 없음

답변 1개

정렬 기준: 가장 유용함
  1. 익명
    2016-06-14T02:27:27+00:00

    안녕하십니까? hee jeongAhn 님

    Microsoft Community 사이트를 방문해 주셔서 감사합니다.

    문의 하신 Excel 인쇄 넘버링에 대해 안내를 드리겠습니다.

    말씀해 주신 VBA 매크로의 경우 안타깝게도 해당 포럼에서 지원이 되지 않습니다. 불편하시더라도 MSDN 개발자 포럼에 문의하여 도움을 받아 보시기 바랍니다.

    http://msdn.microsoft.com/ko-kr/office/

    http://social.msdn.microsoft.com/Forums/vstudio/ko-KR/home?forum=visualbasicko

    추가적인 내용이 있다면 하단의 [응답] 버튼을 눌러 회신해주시기 바랍니다.

    제시해 드린 답변이 도움이 되었기를 바랍니다.

    응답이 문제 해결에 도움이 되었다면, 아래에 있는 답변으로 [표시] 버튼을 눌러 주시기 바랍니다. 이는 유사한 증상을 겪는 다른 사용자들에게 도움이 될 수 있습니다.

    감사합니다.

    이 대답이 도움이 되었나요?

    댓글 0개 설명 없음