Steve,
This will populate a sheet called "Hits" with your list, to give you the
idea of a possible solution. Create the sheet first. Variable SheetName is
the name your code has found.
Dim Index as long
Index = 1
At the place in your code where the message box is,
Sheets("Hits").Cells(Index, 1) = SheetName
Index = Index + 1
Untested.
--
Earl Kiosterud
www.smokeylake.com/
-------------------------------------------
"thephoenix12"
wrote in message
news:thephoenix12.1r16uq_1119449139.1649@excelforu m-nospam.com...
Hi,
I have a macro that searches for something in multiple worksheets, and
each time it finds what it is looking for, a message box pops
displaying the name of the worksheet. Instead of this, I would like it
to display all the worksheet names on a notepad sheet, or word file, or
something that is printable.
Thanks for your help,
-Steve
--
thephoenix12
------------------------------------------------------------------------
thephoenix12's Profile:
http://www.excelforum.com/member.php...o&userid=24336
View this thread: http://www.excelforum.com/showthread...hreadid=381213