"Run-time error '13': Type mismatch" when deleteing multiple cells from targeted columns

I'm new to this forum but it looks like the place to be to get help with Macros

I have the following code that works great, it essentially puts Auto Caps on anything in columns B, F, AA, and DX which is what I want but when I go to delete multiple items in the same row from these columns I get this error: "Run-time error '13': Type mismatch"

I then select debug and it highlights this line in yellow from my code: Target = UCase(Target)

Here's my code:

Please Login or Register  to view this content.

Any help would be greatly appreciated!

Thanks!

the first part of your code doesn't seem to do anything? why is it there?

perhaps

Please Login or Register  to view this content.

please note the code tags I added to your post-you need to use them when posting code