2 Outlook에서 연락처 주소에있는 약속을 만드는 방법

Outlook 솔루션 2025 년 9 월 29 일

특정 연락처에서 약속을 만들고 연락처 주소를 약속 위치로 직접 사용하려는 경우. 이 경우이 기사에서 소개 한 두 가지 방법을 적용 할 수 있습니다.

경우에 따라 Outlook의 연락처 인 누군가와 약속을 예약하고 연락처 주소를 약속 위치, 회사 주소 또는 집 주소로 직접 사용해야 할 수 있습니다. m의 경우ost 사람, most 익숙한 방법은 수동으로 약속을 만들고 연락처 주소를 위치 필드에 복사하는 것입니다. 그러나 실제로 Outlook VBA를 사용하면 한 번의 클릭으로 빠르게 가져올 수 있습니다. 이제 우리는 각각 두 가지 방법을 소개합니다.

방법 1 : 연락처 주소를 새 약속에 수동으로 복사

먼저 Outlook 응용 프로그램을 시작하십시오.
그런 다음 연락처 창으로 전환합니다.
다음으로 소스 연락처를 두 번 클릭하여 자체 창에서 엽니 다.
그런 다음 "주소"섹션을 찾아 주소를 복사해야합니다.
그 후 "연락처"탭 아래의 "커뮤니케이션"그룹에서 "미팅"버튼을 클릭 할 수 있습니다.
나중에 회의가 표시됩니다. 이제 "위치"필드를 클릭하고 "Ctrl + V"를 눌러 이전에 복사 한 주소를 붙여 넣을 수 있습니다.
마지막으로 회의를 표준 약속으로 전환하려면 "초대 취소"버튼을 누르기 만하면됩니다.

방법 2 : Outlook VBA를 사용하여 빠른 시간 내에 완료

처음에는 "Alt + F11"키 단축키를 누르십시오.
그런 다음 열린 VBA 편집기 창에서 사용하지 않는 모듈을 열 수 있습니다.
다음으로 다음 VBA 코드를 복사하여 붙여 넣으십시오.

Sub CreateAppointmentLocatedAtContactAddress()
    Dim objContact As Outlook.ContactItem
    Dim objAppointment As Outlook.AppointmentItem
    Dim nPrompt As Integer
 
    On Error Resume Next
    Set objContact = Application.ActiveExplorer.Selection.Item(1)
 
    If TypeOf objContact Is ContactItem Then
       Set objAppointment = Application.CreateItem(olAppointmentItem)
       objAppointment.Subject = "Appointment with " & objContact.FullName
 
       'Use the business address as the first choice
       If objContact.BusinessAddress <> "" Then
          With objAppointment
               .Location = objContact.BusinessAddress
               .Display
          End With
       'If no business address, then use the home address
       ElseIf objContact.HomeAddress <> "" Then
          With objAppointment
               .Location = objContact.HomeAddress
               .Display
          End With
       'If no address, then display a prompt
       Else
          nPrompt = MsgBox("You haven't filled in the contact's address!", vbExclamation, "Check Address")
       End If
    End If
End Sub

그런 다음 평소와 같이 빠른 실행 도구 모음에 매크로를 추가합니다.
결국 시도해 볼 수 있습니다.

먼저 연락처를 선택하십시오.
그런 다음 빠른 실행 도구 모음에서 매크로 버튼을 클릭합니다.
즉시 새 약속이 다음 스크린 샷과 같이 연락처 주소와 함께 위치로 표시됩니다.

Outlook 문제를 효과적으로 해결

Outlook 문제를 효율적으로 제거하기 위해 강력한 Outlook 수정 사전에 도구와 같은 DataNumen Outlook Repair. 그렇지 않고받은 편지함 복구 도구 인 Scanpst.exe에 간단히 회신하면 심각한 Outlook 충돌시 마침내 쓸모가 없다는 것을 알게됩니다. 또한 정기적 인 데이터 백업을하는 좋은 습관을 개발 한 경우 훨씬 좋습니다.

저자 소개 :

Shirley Zhang은 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. 수리 SQL 및 전망 수리 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM