Calendar appointment, type 2

Status
Not open for further replies.

Dan Ehrhart

Member
Outlook version
Outlook 2013 32 bit
Email Account
Office 365 Exchange
I use normal appointments quite a bit and want to keep them as they are. I also often create appointments on my calendar that are personal reminders to do something or check on something. I always use the same time for start and stop, mark private, change busy to free, and turn off the reminder. Is there a way to create an additional appointment type that I can utilize for these personal reminders?
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
you could create a custom form or use a macro to set the values - macro would be easier. add a button to the ribbon and click it when you want to create the personal reminder.

i thought i had a macro on my site that did this but cant find it right now. i'll look again when i get on my big computer.
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
This creates an appointment for 9 am "today "

Code:
Public Sub CreateOutlookAppt()
    Dim olAppt As Outlook.AppointmentItem
    Set olAppt = CreateItem(olAppointmentItem)
          
    With olAppt
    
    'Define calendar item properties
        .Start = Date + TimeValue("9:00:00")
        .End = Date + TimeValue("10:00:00")
        .Subject = "whatever"
        .Location = "office"
        .Body = "These are notes"
        .BusyStatus = olFree
        .ReminderMinutesBeforeStart = 5
        .ReminderSet = True
        .Categories = "Personal"
        .display
       
    End With
   
  Set olAppt = Nothing
End Sub
 
Status
Not open for further replies.
Thread starter Similar threads Forum Replies Date
O Calendar - appointment templates and categories Using Outlook 1
S View Appointment in Text Wrap in Outlook 2007 Month Calendar View Using Outlook 0
R Recover Deleted Appointment in Calendar Using Outlook 0
D Record Appointment to Calendar on "Public Folder" Outlook VBA and Custom Forms 13
A Get shared calendar name or id in custom appointment form Using Outlook 0
N Adding Appointment Item in Outlook to Shared Calendar Folder Outlook VBA and Custom Forms 7
Diane Poremsky Send an Email When You Add an Appointment to Your Calendar New Slipstick.com Articles 0
J Outlook calendar...How to add an event or appointment without a border around it? Using Outlook 9
M Create an Appointment from XL Spreadsheet in a Shared Calendar. Outlook VBA and Custom Forms 1
L Showing @live account in outlook 2013 calendar as private appointment Using Outlook 1
M Email notification on creation of an appointment shared calendar? Outlook VBA and Custom Forms 3
anoble1 How to create an email with a link to add a calendar appointment Using Outlook 1
I how to create appointment using saved template onto public folder shared calendar Using Outlook 3
R Calendar Appointment Hour Range Using Outlook 1
R How to copy outlook 2010 shared calendar appointment or meeting to personal calendar by vba? Outlook VBA and Custom Forms 1
D Reoccuring appointment issues when exporting Calendar to Excel Using Outlook 3
S Calendar deletes appointment after entry from both Outlook and Icloud calander Using Outlook 1
R OL2010 Calendar Appointment Highlighting Text issue Using Outlook 3
W ghost appointment in calendar.ics Using Outlook 2
D Selecting shared calendar for appointment/meeting templates Using Outlook 2
P Appearance (Width) of Calendar Appointment "Show as (Free/Busy/etc)" Indicator Using Outlook 1
B Outlook Calendar Appointment Problem Using Outlook 1
P Previous Appointment issue in Calendar Using Outlook 1
J Printing Private Appointment Detail on Calendar Printing Assistance Calendar Printing Assistant 0
J Can't print appointment times on Monthly View Calendar? Using Outlook 4
J Can't print appointment times on Monthly View Calendar? Using Outlook 0
J Microsoft Outlook Calendar - end time of appointment has started printing but don't want it to print Using Outlook 2
J calendar: populate multiple appointment subject fields at once Using Outlook 4
J We want to hide all calendar appointment details and only show free/busy times. Using Outlook 9
K Outlook 2007 - Shared Calendar - Who created appointment? Using Outlook 4
E Outlook 2003 changing appointment date or time does not update on calendar Using Outlook 5
J Outlook 2010 Shared Calendar - Appointment Feature Using Outlook 2
M We all use a 'shared' calendar to enter in our loan appointments. Is there a sound notification when someone enters an appointment in the c Using Outlook 1
M Calendar: Subject goes blank when I resize an appointment Using Outlook 3
R I can not get calendar/appointment reminders to work Using Outlook 1
R HOW do you know that an calendar appointment contains text without opening it?__ Calendar appointments Using Outlook 1
E Changes to appointment reminder defaults on the File->Options-Calendar are not saved! Bug or feature? Using Outlook 3
B Duplicate recurring appointment in Outlook 2010 calendar with OLC 14 Outlook Live Connector Using Outlook 1
M 2007 Outlook Calendar - Inability to change one appointment label/category in a series Using Outlook 1
J Automatically catagorising a calendar appointment using the subject Using Outlook 1
J I cannot set up a new appointment in outlook 2003 calendar Using Outlook 4
J Add a meeting / appointment to my Calendar without emailing the other person (like I was able to do Using Outlook 3
J Automating Shared Calendar appointment reminders Using Outlook 1
J Re: Edit 2007 Calendar appointment directly without opening occurrence or series. Using Outlook 1
S Creating a calendar appointment as a Delegate Using Outlook 1
G How can I delete a private appointment in shared calendar in public folders? Using Outlook 1
J Calendar appointment details will not show when printing Using Outlook 8
R Store an appointment in the correct calendar Using Outlook 1
S Creating a calendar appointment originating from a delegate Using Outlook 2
R Cannot right-click on calendar to create new appointment Using Outlook 4
Similar threads


















































Top