Macro to delete unwanted items

[Howardc1001]

I have written code to delete unwanted items in Col B on sheet1 containing certain text below (have highlighted the items to be deleted in yellow)

INTERBRANCH TRFS
sample Trf

Please Login or Register  to view this content.

when running the macro none of the items highlighted are deleted


It would be appreciated if someone could assist me

[jindon]

Please Login or Register  to view this content.

[dominicb]

Good morning Howardc1001

Try the following :

Please Login or Register  to view this content.

Note that :

• The * before Sample TRF is important - it's a wildcard
• The "Like" operator IS case sensitive, so "Sample TRF" is not the same as "Sample trf"
• The "INTERBRANCH TRFS" line won't work, bacause that isn't what appears in your workbook.

HTH

DominicB

[Howardc1001]

Hi Dominicb


thanks for the help and your input


How can I amend the case so it accepts upper, lower and proper case ?

[dominicb]

Hi Howardc1001

Change your comparator to upper case, and then use UCase in your code to make your string uppercase, for the check only. The line would then look like :

Please Login or Register  to view this content.

HTH

DominicB

[Howardc1001]

Thanks for letting me know