![]() Range("A1:D1").Value = Array("Subject", "StartDate", "EndDate", "Category") With Sheets("Sheet1") 'Change the name of the sheet here Set olFolder = olNS.GetDefaultFolder(9) 'olFolderCalendar ![]() ![]() If Err.Number > 0 Then Set olApp = CreateObject("Outlook.Application") Set olApp = GetObject(, "Outlook.Application") This is the code, but I cannot manage to modify it correctly. Also, there may be some recurrent activities weekly/monthly that should be exported correctly. The main issue is that I want on a specific period of time by an Input Box, first to enter the start date and then the end date of the period I want to be exported. ![]() I need to export "Subject", "StartDate", "EndDate" and "Category". I am trying to modify a code that I found in order to export my calendar appointments in Excel.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |