Sub to aquire list of worksheets

[aking1987]

Code
-------------------
Sub MacroAddNewFileListSheetNames()

Range("*I1*").Select
For Each Sheet In ActiveWorkbook.Worksheets
Select Case Sheet.Name
Case "*Master Numbers*"
'Ignore
Case Else
ActiveCell.Value = Sheet.Name
Cells(Cells.Row + 1, Cells.Column).Activate
End Select
Next
End Su
-------------------


The above code only seems to work for TWO sheet names.
Once TWO names has been entered, the second name is overwritten.

Any ideas please

 

[Guest]

DONT create new threads as you have been doing: it sends everyone else on a
wild goose chase and you can't track whether the problem has been answered.

See your original posy about 4 below this.

 

[JE McGimpsey]

He can't necessarily help it. Excel-forum has been posting broken
replies for days now. They have a "thread-id" in the bottom of the post
that takes you to the web site, but the article itself doesn't contain a
Reference: field.

Mr. Rubin of Excel-forum says he's aware of the issue and is working to
fix it.

 

[JE McGimpsey]

See your original posy about 4 below this.

BTW - Why do you assume that "the original posy" is "below this"?

If you use a real newsreader instead of a web portal, you can configure,
sort, and slice posts the way you want. I happen (today) to have my
messages sorted with oldest on top, sorted by thread, so for me it was
"6 above this" (unless you count the two additional posts in one thread
that are hidden until I select the 1st post in the thread). When this
reply is posted, this thread will move up near the top for me, since
I'll be in the "Reference" header chain. It'll have a different color
for the author field (since it's me), a different font color (since I've
replied), and a different background color (since the post was made from
a Mac newsreader).