Copy result from Find and Replace

[Flicker]

Hello All, I use Ctrl+F -- Find and Replace command in Excel. I want to find a specific word in Excel, all sheet (in Workbook I mean). I press Option>> and change Within: sheet to workbook and found like a thousand of results. I want those result show in a new sheet because I want to create an index based on that result. How can I do that, please? Thanks,

 

[Flicker]

Cells.Find(What:="Deposit", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate

I record macro and found a VBA script for find and replace but I do not know how to pass the result into new sheet. Please help me.

 

[John_w]

You need a loop for the worksheets and within that a Find and FindNext loop - look at the VB help or search for examples.