Assuming you have a sufficiently recent version of XL, you don't really need
any programming.

Use Edit | Find... to specify what to find. Click the 'Find All' button.
You will see a list of all cells containing the search token. Click on the
first item. SHIFT+click on the last item. XL will select all those cells in
the worksheet. Right click in any of those cells in the worksheet and select
Copy. Switch to the destination worksheet and paste.

This is one of those instances where the UI lets one do something that is
not possible through code for the simple reason at the object model doesn't
expose the 'Find All' capability.

--
Regards,

Tushar Mehta
www.tushar-mehta.com
Custom business solutions leveraging a multi-disciplinary approach


"new_to_vba" wrote:


i have 2 files, Information & 822,
i need to check for all the data that contain the texts "IT" in 822,
and copy the specific range of data(such as A9,F9,J9,L9) into another
file called Information.

this seems impossible, i tried my best but i still can't get it done..


--
new_to_vba
------------------------------------------------------------------------
new_to_vba's Profile: http://www.excelforum.com/member.php...o&userid=30131
View this thread: http://www.excelforum.com/showthread...hreadid=509271