Run Time Error 13 Type Mismatch

Having problems with my code. It will work by itself but when I copy and paste data into the worksheet I get a run time error 13 type mismatch.

Please Login or Register  to view this content.

The error is with the first case "Case Injected"


Code using to move to the worksheet with the above code.

Please Login or Register  to view this content.

Any help would be greatly appreciated.

Thanks

Please read the forum rules and add code tags above.

Maybe include a Case Else and check what's in the Target Cell. I seem to think that Select Case is case sensitive so perhaps use LCase on the Target.Value and around the text ... or just make the first characters of the text lower case.

Regards, TMS

I'm very new to VBA and the original code that I had found had the LCase, which is where the original error was. So I removed the LCase and made all the first characters of the text lower case...... still ended up with a run time error 13, but the error was with the first case "Case Injected"

Please Login or Register  to view this content.

Run Time Error 13 Type Mismatch in code Select Case LCase(Target.Value)

Please, read the forum rules and add code tags to both your posts.

Also, please post sample workbook ... no-one can do much with this without data.

Regards, TMS

Thanks for the code tags and the sample workbook.

The second version of the code works fine for me.

Maybe a little shorter:

Please Login or Register  to view this content.

Interestingly, with the first set of code, if you type "injected", no quotes and lower case "i", the DV accepts it, the Worksheet Change event fires, but the Case Select just drops through. The second version accepts either case.

I don't get any error messages with any of the code.

Note that you should not have a subroutine or macro that has a reserved word for its name; in this case, Copy(). Excel/VBA can get quite confused.

And you shouldn't really have code in the Workbook module unless they are workbook events. Your MasterModule should be in a standard module

Regards, TMS

The code works fine for me just copied and pasted into the sheet class module for the check list sheet.

So, nothing wrong with the code. Nothing wrong with the sample. Did you copy and paste the code? Did you make any changes to the code? Is the structure of your real workbook different? Not that the workbook structure would make a difference, I don't think. What can I say? You're using a drop down data validation list so you can't mistype anything ...

You've actually confused me in that you say:

which should copy data from "data"2 to "check list"

There's no data in that sheet and no code behind it, at least in the sample.

You need to provide a sample of the workbook which is more reflective of what you really have, complete with code and before and after sheets explaining what should happen, when and why.

If you leave it three weeks before you come back, I'll be in the middle of my holiday so you're unlikely to get an answer for a month or so. Guess it's not urgent?

Regards, TMS