Macro to remove duplicates and send email?

Hi Guys

I work for an online retail store and have a spreadsheet that I use to order stock in from other stores and suppliers. I bastardised a macro I found online to email a selection of cells.

These are the steps that the macro does:
Copy the range and create a new workbook to past the data in
Publish the sheet to a htm file
Read all data from the htm file into RangetoHTML
Close TempWB
Delete the htm file we used in this function

I also need it to remove duplicates before it sends the email but I'm not quite sure how to do this, can anyone help me?

Please Login or Register  to view this content.

I might have just solved it myself. Can someone please let me know if you see any problems with this? It seems to work for now...

I just added it in to Function RangetoHTML(rng As Range) after the section 'Copy the range and create a new workbook to past the data in

Please Login or Register  to view this content.