Possible to add reminders or flags within a cell?

LoriB600 

You can create appointments directly from Excel in Outlook with VBA. The following is a VBA code that you can easily adapt to your needs. You can also read the parameters from cells.

Here is a small example:

Option Explicit

Sub Event_Outlook()

Dim ol, OutApp As Object, apptOutApp As Object

Set ol = CreateObject("Outlook.Application")
Set apptOutApp = ol.CreateItem(1)
With apptOutApp
    '.Start = 'Start of the appointment, date and time in different cells
    '.End = 'End of the appointment
    .Subject = "Projectmeeting" 'Betreff
    '.Duration = 'Duration, in minutes if fixed
    .body = " Hello everybody," & vbCrLf & vbCrLf & _
            " this is an invitation to the project meeting "
    .RequiredAttendees = "max@mustermann.de; john@doe.com" ' Email addresses
    .Location = "Meeting room" 'Place of the appointment
    .Categories = "Projectmeeting" 'Assign Category
    .ReminderSet = False 'Set reminder
    .ReminderMinutesBeforeStart = 43200 'Number of minutes in which the reminder before the _
Appointment appears
    .ReminderPlaySound = True ' The reminder tone is played 
'    .Save 'can set or not set
    .Display 'Open the appointment in Outlook

End With
Set apptOutApp = Nothing
Set OutApp = Nothing

End Sub

‚ungetested

I would be happy to know if I could help.

Nikolino

I know I don't know anything (Socrates)

* Kindly Mark and Vote this reply if it helps please, as it will be beneficial to more Community members reading here.