☰

Excel VBA는 프린터를 공유 프린터로 설정합니다.

tag-icon • tag-icon microsoft-excel vba
Excel VBA는 프린터를 공유 프린터로 설정합니다.

한 페이지에서 다른 페이지로 셀을 복사하고 3페이지를 다른 프린터로 인쇄하려고 하는 긴 VBA가 있습니다.

아래 코드는 기본 프린터를 변경하지 않는 것 같으므로 모든 페이지가 동일한 프린터로 전송됩니다.

 For i = 0 To 15
    curNePrint = Format(i, "00")
    On Error Resume Next
        Application.ActivePrinter = "\\AtanaWin7PC3\DYMO LableWriter 450 on ne" & curNePrint & ":"
    Next i
 Worksheets(le).PrintPreview

나는 프린터에서 낭비되는 종이를 절약하기 위해 printPreview를 사용했습니다.

누구든지 각 페이지에 프린터를 설정하는 데 도움을 줄 수 있습니까?

감사해요

답변1

방금 코드를 시도한 결과 프린터를 성공적으로 변경할 수 있었습니다.

프린터 이름에 철자 오류가 있을 가능성이 가장 높습니다.

아마도 LableWriter는 LabelWriter여야 할까요?

프린터 이름을 결정하려면 활성 프린터를 수동으로 변경한 다음 a와 같은 작업을 수행하고 Debug.Print Application.ActivePrinter문자열 결과를 지정한 결과와 주의 깊게 비교하는 것이 좋습니다.

관련 정보