หากคุณต้องการสร้างการนัดหมายจากผู้ติดต่อเฉพาะและใช้ที่อยู่ติดต่อโดยตรงเป็นสถานที่นัดหมาย ในกรณีนี้คุณสามารถใช้ 2 วิธีที่แนะนำในบทความนี้
บางครั้งคุณอาจต้องกำหนดเวลานัดหมายกับใครบางคนซึ่งเป็นผู้ติดต่อใน Outlook ของคุณและใช้ที่อยู่ติดต่อเป็นสถานที่นัดหมายโดยตรงที่อยู่ธุรกิจหรือที่อยู่บ้าน แบบฟอร์มost คนมost วิธีที่คุ้นเคยคือสร้างการนัดหมายด้วยตนเองและคัดลอกที่อยู่ติดต่อไปยังฟิลด์ตำแหน่ง อย่างไรก็ตามจริงๆแล้วด้วย 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 และผลิตภัณฑ์ซอฟต์แวร์ซ่อมแซมแนวโน้ม ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.