Delete last sheet in workbook
X is an unknown.
"PCLIVE" wrote:
Does "X" represent an unknown number, or is it actually "SheetX" or "Sheet
X"?
If that is the case, then I would think you could just adjust the code to
include the specific sheet name.
Sheets("SheetX").Delete
If "SheetX" is not the actual sheet name and "X" just represents the
automatic sheet number when a sheet is inserted, then we'll have to come up
with an alternative. If that is the case, then how many sheets could there
be in this workbook? Would the X number ever be double digits? Would any
other sheet names end in a number (example, a sheet named say,
"Test4"...basically a sheet that does not begin with the word "Sheet" but
still ends in a number).
Regards,
Paul
--
"Joe Gieder" wrote in message
...
Thanks for the reply. Sometimes it's in the middle not very often but it's
always called "Sheet X".
Thanks
Joe
"PCLIVE" wrote:
Use this ONLY if it is always the last sheet in your workbook.
Application.DisplayAlerts = False
Sheets(Sheets.Count).Delete
Application.DisplayAlerts = True
HTH,
Paul
--
"Joe Gieder" wrote in message
...
First, thank you for looking at this post.
I have a macro that takes the cell comments from other sheets and
creates
a
summary sheet showing all of them. I'm constantly adding to the main
sheets
and running this macro but every time I do I have to first delete the
sheet
the macro created. Since the macro is called different tings every time
it's
created I just say delete sheet xx. Since 95% of the time this sheet is
at
the end is there any code that will automatically find and delete this
sheet,
the sheet is always called "Sheet?". Also is there any code that I can
use
so
I don't have to hit OK when the message box pops up saying that the
sheet
will permenantly be deleted?
Thanks again for you help
Joe
|