Vba to display message when duplicate enteries are in the same row

I am looking to display a message when values are the same within a certain range on my worksheet. For example from A5:S5 if the same value is entered in that row twice I want a message to display warning the user.
I know how to display a message box in vba but cant work out the first part.
Any help.
Thanks.

how do you want to identify the range to check for identical values?

for example, this will check up to 5 columns before and after the activecell and display a message box if it finds a duplicate:

Please Login or Register  to view this content.

I've attached an example. There are drop downs in row 9. If the user selects the same animal twice from column E:J I want the message box to appear. To let you understand I have the same drop downs further along the row.