Alter Macro from "Find cell location if blank" T o "Find cell location if "MyWord"

[capson]

Hello I need to find the cell locations for cells whose value is "MyWord" in the active worksheet and have it show in a MsgBox, the code below does this for blank cells, I do not know how to alter it.

Thanks

Please Login or Register  to view this content.

[AB33]

Please Login or Register  to view this content.

[capson]

AB33, thank you it work but it only finds the 1st cell, is it possible to find all the cells with "MyName" in them and list there locations in the MsgBox.

[AB33]

Please Login or Register  to view this content.

[capson]

Thank you AB33, that worked perfectly.