find and replace in all sheet in workbook error

Hello Everyone
i have workbook have multiple sheet that i want to search on specific value list then replace it
i have table name (table1) that have two column , one that look and other is new data
i get this code but its give me error in the following line
Set TempArray = tbl.DataBodyRange
although this code if i make new file its work
can advice which this error is related

Please Login or Register  to view this content.

Please Login or Register  to view this content.

Remove Set and add Value:

Please Login or Register  to view this content.

BTW.
No declaration of the TempArray variable.

Artik

Dear Artik thank you so much for your replying
still give me error
do you can advice how can change this code to range without table
i put my data in range U3:V65
u column data to look
V column data to replace
i try to modify this to the following but give me same error

Please Login or Register  to view this content.

i note that in data in table that lookup there is this symbol ' before my value
like 'GHG/12536524
i think error coming from it , its possible

Originally Posted by mazan2010

i note that in data in table that lookup there is this symbol ' before my value
like 'GHG/12536524
i think error coming from it , its possible

Select such a cell, but do not edit it. If you see the apostrophe (') only in the formula input field (and you don't see it in the cell), it doesn't affect the value of the cell. This is a special formatting character (from the Stone Age ) that tells Excel to treat the value as text.

Try this code:

Please Login or Register  to view this content.

If you're still having trouble with the macro, attach a sample workbook where the code doesn't work.

Artik

Thank you so much Artik