Macro: Combining a list of notes into one cell

Hello,

I have a long list of records and each record has a list of notes. Some have one note and others have many lines of notes. What I need to do is combine all the notes for each record into one cell. I know how to do this manually using TextJOIN but I have thousands of records and going through each manually would take forever. I am looking for a macro that can combine all of the notes into one cell by record. Or in other words, there should be one cell with all the combined notes per record (ID in my example)I have attached a spreadsheet as an example of what I need.

Please help.

Thanks!