때로는 지도에서 모임 장소를 확인하고 싶을 수도 있습니다. 따라서 이 p에서ost, Outlook 내에서 직접 회의 위치를 매핑할 수 있는 VBA 코드 조각을 공개합니다.
우리 모두 알고 있듯이 Outlook에는 연락처 주소를 매핑하는 기본 기능이 있습니다. 단, 미팅 장소를 매핑하는 기능은 없습니다. 따라서 많은 사용자가 회의 위치를 매핑하는 방법을 기대하고 있습니다. 일반적으로 인터넷 브라우저에서 지도 서비스에 의존한 다음 회의 장소를 검색할 수 있습니다. 그러나 의심의 여지없이 약간 번거롭습니다. 따라서 여기서는 Outlook에서 직접 회의 위치를 매핑하는 방법을 알려 드리겠습니다. 이제 정교한 단계와 구체적인 VBA 코드를 얻으려면 계속 읽으십시오.
Outlook 내에서 직접 회의 위치 매핑
- 로tart, Outlook 프로그램을 시작하십시오.
- 기본 Outlook 창으로 들어간 후 "Alt + F11"키 버튼을 누릅니다.
- 그러면 Outlook VBA 편집기 창에 액세스할 수 있습니다.
- 그런 다음 사용하지 않는 모듈을 찾아서 열어야 합니다.
- 다음으로 다음 VBA 코드를 복사하여 이 모듈에 붙여넣을 수 있습니다.
Sub MapMeetingLocationiwithinOutlook()
Dim objMeeting As Outlook.AppointmentItem
Dim objWordDocument As Word.Document
Dim strMeetingLocation As String
Dim strURL As String
Dim objExplorer As Explorer
Dim objWebBrowser As Object
On Error Resume Next
Select Case TypeName(Outlook.Application.ActiveWindow)
Case "Inspector"
Set objMeeting = ActiveInspector.CurrentItem
Case "Explorer"
Set objMeeting = ActiveExplorer.Selection.Item(1)
End Select
strMeetingLocation = objMeeting.Location
If strMeetingLocation <> "" Then
strMeetingLocation = Replace(strMeetingLocation, " ", "-")
'Use Google Maps
strURL = "http://maps.google.com/maps?q=" & strMeetingLocation
'Open the map of the meeting location within Outlook
Set objExplorer = Application.ActiveExplorer
Set objWebBrowser = objExplorer.CommandBars.FindControl(, 1740)
objWebBrowser.Text = strURL
objWebBrowser.Execute
Else
MsgBox "Invalid Location", vbExclamation
End If
End Sub
- 그런 다음 나중에 편리한 확인을 위해 빠른 실행 도구 모음 또는 리본에 새 매크로를 추가하는 것이 좋습니다.
- 나중에 Outlook 매크로 보안 수준을 낮음으로 변경해야합니다.
- 마지막으로 시도해 볼 수 있습니다.
- 첫째, 회의를 열어 자체 창에서 보거나 회의를 선택하여 읽기 창에서 볼 수 있습니다.
- 그런 다음 빠른 실행 도구 모음에서 새로 추가된 매크로를 누를 수 있습니다.
- 다음 Outlook은 기본 창에서 Google 지도를 열고 다음 스크린샷과 같이 회의 위치를 매핑합니다.
오류로부터 면역될 수 없음
여러 기능을 자랑함에도 불구하고 Outlook은 여전히 오류에서 면제되지 않습니다. 예를 들어 Outlook을 사용하는 동안 다양한 문제가 발생할 수 있습니다. 따라서 정기적으로 Outlook 데이터를 백업하고 강력한 Outlook 복구 도구, 같은 DataNumen Outlook Repair.
저자 소개 :
Shirley Zhang은 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. mdf 복구 및 전망 수리 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM