Finding multistrings across multiple worksheets and replace

[Dahlia]

Hi Experts,

Below is what I've tried to do across multiple worksheets in same workbook (except for Sheet1). The code supposed to insert additional column in each wsheet and put the wsheet name to all rows with data. Then after that need to find strip off the strings "N-" or "AT-" in that first column. It does correctly for inserting the wsheet name but it doesn't do anything on the find & replace strings. And I notice that the highlighted range also not cleared (supposed to be cleared before selecting the whole col A and do the find and replace). But I don't see pop-up error too. Please help to correct my coding below:-

Please Login or Register  to view this content.

Thank you in advance.

DZ

[Richard Buttrey]

Hi,

Try

Please Login or Register  to view this content.

[Dahlia]

Hi Richard Buttrey,

Your code works like a charm!!! Awesome!! Thank you soooo much!!

DZ

[Richard Buttrey]

Happy to have helped and thanks for the rep.