Please Help w/ Macro!!!

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Lovebaby - 03 Jul 2006 23:46 GMT

I get spreadsheets that have numerous (superfluous) tabs that I must delete
every time before I present the data.

When I record a macro to delete these tabs and then execute it, I still have
to respond to the dialog box - " do you want to delete this worksheet as it
may contain links to other worksheets".

There are 22 tabs (worksheets) that I must delete, so even with my macro, I
have to press Enter 22 times - not very efficient!!!

Any ideas to eliminate or bypass the dialog box and have the macro
automatically delete the tabs?

Reply to this Message

Dave Peterson - 03 Jul 2006 23:48 GMT

application.displayalerts = false
'your code to delete your 22 sheets
application.displayalerts = true

> I get spreadsheets that have numerous (superfluous) tabs that I must delete
> every time before I present the data.
[quoted text clipped - 8 lines]
> Any ideas to eliminate or bypass the dialog box and have the macro
> automatically delete the tabs?

Signature

Dave Peterson

Reply to this Message

Lovebaby - 04 Jul 2006 11:48 GMT

Thanks, but I'm not VBA savvy. Could you give me a little more detail how I
would use these statements or where I would put them?

> application.displayalerts = false
> 'your code to delete your 22 sheets
[quoted text clipped - 16 lines]
>> Any ideas to eliminate or bypass the dialog box and have the macro
>> automatically delete the tabs?

Reply to this Message

Dave Peterson - 04 Jul 2006 12:12 GMT

You have code in your macro to delete the 22 worksheets.

Just make sure that each set of delete statements is surrounded by those
statements:

application.displayalerts = false
worksheets("Sheet9999").delete
worksheets("sheet8888").delete
application.displayalerts = true

if this doesn't help, you may want to post the relevant portion of your code.

> Thanks, but I'm not VBA savvy. Could you give me a little more detail how I
> would use these statements or where I would put them?
[quoted text clipped - 22 lines]
> >
> > Dave Peterson

Signature

Dave Peterson

Reply to this Message

Rate this thread: