Macro to pull calendar appointments from outlook into excel

[OdnsRvns]

Title says it all. I'm trying to streamline my morning reporting. I have a few different excel files and reports I run for our start up. I am trying to combine everything I run into one page. I have most of the reports pulled in now I just have to pull the data from my calendar and I can be down to one all in one page. I have googled as much as I can most the macros I find are for older versions of excel. Does anyone have a clue where I could start with this kind of task.

Thanks

[snb]

This might be helpful:

http://www.snb-vba.eu/VBA_Outlook_external_en.html#L6

[westconn1]

most the macros I find are for older versions of excel.why would this affect the coding for automating outlook?
try like

Set olapp = CreateObject("outlook.Application")
Set calf = olapp.GetNamespace("mapi").GetDefaultFolder(olFolderCalendar)
For Each calit In calf.Items
'do stuff here to put calit into excel, or not as required
Next