안녕 아만다!
이것은 Ryan4의 ExtendOffice. 내 문제를 해결하는 데 도움이 되도록 이메일 주소를 보내주셔서 감사합니다. 귀하의 환상적인 커뮤니티를 발견한 이후로 적극적인 회원이 될 예정이므로 결국 내 파일 업로드 문제가 해결되기를 바랍니다!
지금은 여기에서 첨부 파일을 참조하십시오. "End if" 대신 "Exit Sub"를 읽도록 코드를 업데이트했지만 디버그 옵션이 없는 오류가 계속 발생합니다. 조언해주실 수 있나요? 아마도 그것은 내 구조 또는 들여 쓰기입니다.
도와 주셔서 다시 한 번 감사드립니다!
라이언
안녕하세요, 라이언,
이메일 메시지가 수신되었습니다. 같은 문제를 겪고 있는 다른 사용자가 있을 수 있으므로 여기에 답변을 드리겠습니다.
아래 방법을 시도해 보세요.
1. 열려있는
참조.
2. 검사
Microsoft Outlook 16.0 개체 라이브러리.
참고: 16.0 대신 15.0, 14.0 등이 있을 수 있습니다.
3. 아래 코드를 교체하십시오.
Dim xOutApp As Object
Dim xOutMail As Object
에
Dim xOutApp As Outlook.Application
Dim xOutMail As Outlook.MailItem
위의 3단계를 시도해 보세요. 귀하의 vba는 우리 컴퓨터에서 잘 작동하므로 문제를 재현하기 어렵습니다. 이 방법이 도움이 되길 바랍니다!
아만다