| Description: | True if this appointment is private. You may mark an appointment as private by setting this property. You may both set and get this property. |
| Type: | Boolean |
| Default: | False |
| Example: |
Dim user As Object
Dim appts As Object
Dim appt As Object
Set session = CreateObject("OfficeTalk.Session")
Set user = session.Logon(login name, password)
Set appts = user.appointments
Set appt = appts.Add
appt.Name = "Test"
appt.Private = True
If appt.Private Then
MsgBox "This is a private appointment"
End If