2016-09-30 4 views
0

Outlook 전자 메일에 기본 서명이있는 모든 직원에게 대량 전자 메일을 보냅니다. 내가 직면하고있는 유일한 문제는 화면이 깜박입니다. Application.ScreenUpdating = False을 사용했지만 작동하지 않습니다. 어떤 일을 할 수 있는지 조언 해주십시오.서명을 추가하는 동안 Outlook 화면이 깜박입니다.

With OutMail 
    .BodyFormat = olFormatHTML 
    .Display 
End With 
Signature = OutMail.HTMLBody 

On Error Resume Next 
With OutMail 
    .To = ws.Cells(I, 4).Value 
    .Subject = ws.Cells(I, 1).Value & "-" & ws.Cells(I, 3).Value 
    .HTMLBody = StrBody & vbNewLine & RangetoHTML(rng) & vbNewLine & Signature 
    .Send 
End With 
+1

변수 선언이있는 곳에서 전체 코드를 게시 할 수 있습니까? – RCaetano

+2

그냥'.Display' 줄을 꺼내십시오. – Comintern

+1

@Comintern 내 경험에 따르면 Signature을 생성하기 위해 표시하는 것이 일반적입니다. – niton

답변

1

표시를 호출 할 필요가 없습니다. MailItem.GetInspector으로 만 전화를 걸더라도 서명이 추가됩니다.

두 번째로, 두 개의 HTML 문자열을 연결합니다. 그렇게 할 수 없으며 병합해야합니다.

+0

MailItem.GetInspector에서 도움을받을 수 있습니까? OutMail.GetInspector로 사용해야합니까? 또한 병합에 도움을주십시오. 모든 지원과 도움에 감사드립니다. –

+0

GetInspector 속성을 읽을 수 있습니다. 그런 다음 HTMLBody 속성에 서명이 포함됩니다. 두 바디를 병합하는 경우 HTMLDocument 객체를 사용하거나 단순히 ""문자의 위치를 ​​찾은 다음 사용자 정의 HTML을 삽입 할 수 있습니다. –

관련 문제