copy body of email to excel spreadsheet

Hi guys

I keep track of members appointments through a excel spreadsheet.

They provide the following information to me in a email,

Name - Henry

Date - 20 Dec 2017

Time - 15:00

Type - Upper Body

Location - Hospital


I have attached a spreadsheet I use to keep track. There is normally more to this spreadsheet Appointments start at A98.

I have over 40 people emailing me so the appointments keep adding

I have recently received a code from Kenneth for this I was wanting to know if anyone could help me out on a few issues.

Please Login or Register  to view this content.

Does anyone know why I would get this error
Run-time error ‘287’:
Application-defined or object-defined error

Then when I click debug

B = Split (.Body, vbCrLf) this comes up in yellow

Also in the code is it possible to designate the actually cell I want it to go to?

and last of all is it possible

when a appointment has past to be deleted and the new appointments fill up from the top?