Simple macro to create list of sheet names and the contents of cells A1 & N1 of each sheet

I'm hoping to be able to use a macro to:
Create a summary sheet that lists the sheet names and indicate the contents of cells A1 and N1 from each sheet.
I have a macro that only lists the sheet names on a summary sheet but require the extra details. thanks

Either post you code, or a sample book. Would prefer a sample though

I have attached the sample workbook that gets me as far as listing the sheet names on a summary sheet. I would like to have corresponding data from A1 (text data) of each sheet to be in column B of the summary and, N1 (numeric value)of each sheet to be in column C of the summary. thank you

Try attached

Thank you very much! this works for me.

actsmh,
You are welcome!