VBA to Match a cell to a column then delete row

[Mikeym56]

I have researched this on the internet and while many examples are out there I have not been able to find one that meets my scenario 100%. My problem is I have a name (Babe Ruth, for example) in cell M6 on Sheet titled "PlayerProfiles". I am trying to have Excel match that name in Column A (Unique names only, no duplicate names in this column) range A4:A1000 on sheet named "Bat Chart". If a match is found delete that row. Once deleted return to "PlayerProfiles worksheet and a message box would say something like 'Babe Ruth's chart has been deleted' or if a match not found 'Babe Ruth's chart has not been created'. Since there are only unique records in column A I do not need it to continue to search through the list for more matches to delete. I've found some examples on google, but they seem to loop on and on or take what seems a lifetime to finish. Any help would be greatly appreciated.

[Fluff13]

How about

Please Login or Register  to view this content.

[Logit]

.
Another approach :

Please Login or Register  to view this content.

[Mikeym56]

This works great also. Kudos to you for lending your time and efforts to my problem.

[Mikeym56]

Thanks this works awesome. Your time and efforts are greatly appreciated.

[Fluff13]

You're welcome & thanks for the feedback

[Logit]

.
You are welcome. Apologies for not responding sooner. I have not been receiving the notification emails from the Forum for months now.
I have to manually look over my past posts to see if there have been updates.

Cheers.