다음을 통해 공유

VBA로 만든 매크로가 엑셀버전별로 다르게 작동

익명
2015-06-26T06:15:31+00:00

안녕하세요.

각 페이지에 행반복이 되며, 반복되는 행안의 한 셀에 페이지수를 자동으로 뿌려주는 매크로를 검색을 통해서 찾았는데요,  엑셀2003에서는 잘 돌아가는데 2010에서는 안돌아갑니다(첫페이지만 출력됩니다). 아무리봐도 이유를 모르겠네요. 코드는 다음과 같습니다.

Sub PageNumber()

For i = 1 To Application.ExecuteExcel4Macro("Get.Document(50)")

    Range("B2") = i

    ActiveWindow.SelectedSheets.PrintOut From:=i, To:=i, Preview:=True

Next

End Sub

도움주시는 분께 미리 감사드립니다.

Microsoft 365 및 Office | Excel | 가정용 | Windows

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

댓글 0개 설명 없음

질문 작성자가 수락한 답변

익명
2015-06-27T15:26:48+00:00

안녕하세요?

해당 코드는 엑셀 버전과 무관하게 잘 동작합니다.

먼저, 페이지 설정에서, 인쇄 범위가 설정되어 있는지 확인해 보세요.

엑셀 버전이 아니라 워크시트의 페이지 설정의 문제를 확인하시면 될 것 같습니다.

그럼...행운이 있으시길...!

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

댓글 0개 설명 없음

2 추가 답변

정렬 기준: 가장 유용함
  1. 익명
    2015-06-30T00:12:51+00:00

    안녕하세요?

    해당 코드는 엑셀 버전과 무관하게 잘 동작합니다.

    먼저, 페이지 설정에서, 인쇄 범위가 설정되어 있는지 확인해 보세요.

    엑셀 버전이 아니라 워크시트의 페이지 설정의 문제를 확인하시면 될 것 같습니다.

    그럼...행운이 있으시길...!

    빠른 답변 감사드립니다.

    어찌된 영문인지 모르겠으나 지금 답변을 보고 다시하니까 되네요... 원래 인쇄범위는 설정되어 있지 않았습니다 아마 제가 뭘 잘못했을듯.

    부탁드리는 김에 염치불구하고 다음 문제점도 봐주시면 좋겠는데요.

    이 매크로는 '페이지단위'로 번호를 지정하고 그걸 인쇄해주는 것 같더라구요, 근데 제 문서는 100페이지 가량되며 종이출력이 아니라 pdf로 변환해야 하는 문서입니다.  즉, 매크로를 적용시킨 문서전체를 한꺼번에 인쇄해야 하는데 그건 또 다른 코드가 추가되어야 하겠지요?

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

    댓글 0개 설명 없음
  2. 익명
    2015-06-26T07:11:08+00:00

    안녕하십니까? msjeon 님

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

    문의 하신 VBA로 만든 매크로에 대해 안내를 드리겠습니다.

    말씀해 주신 매크로에 대한 지원은 MSDN 개발자 포럼에 문의하여야 도움을 받을 수 있을 것으로 예상이 됩니다.

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

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

    보통 메크로에 포함된 함수/라이브러리의 경우 Windows/Office 버전마다 사용법이나 지원 여부가 달라지는 경우도 있습니다.

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

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

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

    감사합니다.

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

    댓글 0개 설명 없음