Empty all cells if same value

[someone21]

In my workbook, I have many worksheets (>10). Suppose in my active worksheet (sheet3), I have a list of names in a single column A.

Now I want to empty all the cells for all the WS in the workbook containing "any" of those names in column A of activeWS. Suppose sheet3. (a5)= petermange and if sheet7. z24=petermange, I want the z24 cell to be emptied. sheet3.(a64)= gia132 and sheet9. (b3)=gia132, then b3 cell should be emptied. The exception is for active worksheet where none of data should be emptied.

All the data in active ws is in one column only, column A. Whereas the other worksheets, data can be anywhere.

Please kindly help on a macro. Thanks in advance.

 

[someone21]

Please can anybody help on this?

In simple terms, need a macro. Empty all cells within entire WB if it contains any of the words from the column A of the active worksheet.