Simple Copy/Paste Macro with Duplicate Prevention.

Hi,

I am very new to macros (and excel to be honest) but I am working on a macro to copy and paste data into a new worksheet.

Basically I have an excel file which the user chooses some variables in dropdown list cells that result in a concatenate being formed and then I have designed a button, which when pressed sends the concatenate to the next available row in a different tab. However it is important that there are no duplicate values sent to this destination and I want an error message to occur upon the user pressing the button if a duplicate concatenate is made (and not let them paste it). So far I have a working macro to copy and paste the concatenate to the new tab, but I am stumped at creating the error message part.

This is what I have so far:

Sub GENERATOR()

Range("L12").Copy

Sheets("OUTPUT").Range("A" & Rows.Count).End(xlUp).Offset(1, 0).PasteSpecial xlPasteValues

End Sub


(L12 being the concatenate cell and OUTPUT being the destination tab where I can't have any duplicates)

Thank you so much in advance for any help given.

Best Regards,

Chris

Thank you for a speedy response!

When I run this new macro I get this:

Run-time error '1004':

Method 'Range' of object '_Global' failed


Any ideas?

That works brilliantly thank you!

But with one small issue - the 'check' cell doesn't say "Ok" or "Duplicate" it just says false and I wouldn't mind this but its going to be used by a client so I would like it to say this.

See attached.

Apologies, with the one above, change the material type in D13 to 'Steel' and the macro just needs a tweak. But do you see where it says 'False' in J13?