Word Macro Error

Question

Word Macro Error

익명

안녕하세요? 이전에 잘 쓰던 Word Macro인데, Windows 11로 바꾸고 Office 365를 새로 깐 이후부터 에러가 납니다.

함수는 다음과 같습니다.

Sub JMK_pagesInMiddleGotoEndwithPageMark()

'

' JMK_pagesInMiddleGotoEndwithPageMark Macro

'

Selection.MoveDown Unit:=wdParagraph, Count:=1

Selection.MoveLeft Unit:=wdCharacter, Count:=1 

Selection.Find.ClearFormatting 

With Selection.Find 

    .Text = "^#" 

    .Replacement.Text = "^p" 

    .Forward = False 

    .Wrap = wdFindAsk 

    .Format = False 

    .MatchCase = False 

    .MatchWholeWord = False 

    .MatchByte = False 

    .CorrectHangulEndings = True 

    .HanjaPhoneticHangul = False 

    .MatchAllWordForms = False 

    .MatchSoundsLike = False 

    .MatchWildcards = False 

    .MatchFuzzy = False 

End With 

Selection.Find.Execute 

Selection.MoveLeft Unit:=wdWord, Count:=1 

Selection.MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend 

Selection.Cut 

Selection.EndKey Unit:=wdLine 

Selection.TypeText Text:="|" 

**Selection.PasteAndFormat (wdFormatOriginalFormatting)**  ' Error Happend

Selection.MoveDown Unit:=wdLine, Count:=1 

Selection.HomeKey Unit:=wdLine

End Sub

위 함수에서 굵게 칠한 부분에서 Errornumber 4605 가 뜨고 "이 명령은 사용할 수 없습니다."라는 메시지가 뜹니다.

그런데, Debug로 들어가 F8을 누르면 그대로 실행이 됩니다.

다시 매크로를 실행하면 똑같은 일이 일어납니다.

해결책을 아시는 분은 알려주시면 고맙겠습니다.

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

댓글 0개

답변 1개

Answer 1

이 응답은 자동으로 번역되었습니다. 따라서 문법 오류 또는 이상한 표현이 있을 수 있습니다.

안녕하세요 정M.K_

Microsoft 커뮤니티에 게시해 주셔서 감사합니다. 기꺼이 도와드리겠습니다.

게시 한 설명에 따르면 Word 매크로와 관련하여 문제가있는 것으로 보입니다.

당신이하고있는 일로 돌아갈 수 있도록이 작업을 수행하는 것이 정말로 중요합니다. 그러나 우리는이 문제가 커뮤니티에서 일반적으로 논의되지 않는다는 것을 알게되었습니다. 당신이 먼저 우리에게 도달했기 때문에, 우리는 당신이 원하는 해결책을 얻을 수있는 올바른 방향으로 당신을 안내함으로써 당신의 시간이 가치가 있는지 확인할 것입니다.

우리는 당신이 우리의 개발자 도구, 기술 설명서 및 코딩 예제 |에 귀하의 우려를 제출할 수있는이 링크를 제공하고자합니다 마이크로소프트 문서

우리는 당신이 당신의 관심사에 대한보다 관련성있는 정보와 최상의 해결책을 얻을 수 있다는 것을 긍정적으로 생각합니다.

정중하게,

제이슨 게르

마이크로소프트 커뮤니티 중재자

다음을 통해 공유

Word Macro Error

답변 1개