Thanks for the bits of information. I recorded the macro and changed the first line to sheets.select. It works fine except for the fact that I am not able to ungroup the sheets. I cannot use select "sheet1" as it will not normally be "sheet1" I cannot find a command for ungrouping sheets, but if I am guessing right the is probably a work around. I like the dropdown box that appears when I type "select." helps those like me who are not knowledgeable at such tasks. If I can get some input on whether it is going to be possible to ungroup the sheets it will finish off my little project. By the way in response to linda, the reason I explained what I was doing, if you look down about a dozen lines you will see a statement "Is there something in particular you were wanting to do once you had all the sheets selected?", but I originally planned on using the record macro to fill in the formatting options. Thaaaaaaaaanks for all the help and would appreciate this one extra bit of information :-)) Don > From: "Greg Chapman" <greg@xxxxxxxxxxxxx> > Subject: [mso] Re: Excel visual basic command > Date: Mon, 15 Sep 2003 17:52:26 -0500 > > I suppose it would be possible to establish a Range object that addressed > all sheets but dealing with all of them as a collection isn't too painful, > either. For Example: > > Sub HowManySheets() > For Each Sheet In Application.Sheets > MsgBox Sheet.Name > Next Sheet > End Sub > > Is a pretty succinct way of getting Excel to cycle through all the sheets > and tell you their names (if that's what you want). > > Is there something in particular you were wanting to do once you had all > the sheets selected? > > This isntruction: > Application.Sheets.Select > > Or this one: > Application.Worksheets.Select > > ....will both return all the sheets as part of the selection object. But, > what would you be wanting to do then? > > Greg Chapman > http://www.mousetrax.com > "Counting in binary is as easy as 01, 10, 11! > With thinking this clear, is coding really a good idea?" > From: "Greg Chapman" <greg@xxxxxxxxxxxxx> > Subject: [mso] Re: Excel visual basic command > Date: Mon, 15 Sep 2003 19:39:05 -0500 > > <Smack> Aaagghhhh!! And I still won't do it *for* you!<g> > > So, um along that vein, why not take that start I just gave you and see > how you do at adapting your existing macro to the job? Any spots in > particular causing great deals of wailing and gnashing of teeth? (Hint, > that's an invite for a message with some of your macro code on board!) > > Greg Chapman > http://www.mousetrax.com > "Counting in binary is as easy as 01, 10, 11! > With thinking this clear, is coding really a good idea?" > From: "Linda F. Johnson" <linda@xxxxxxxxxxxxxxxxxxxxxxxxxxx> > Subject: [mso] Re: Excel visual basic command > Date: Mon, 15 Sep 2003 20:48:59 -0400 > > Well...we know I don't know diddly about VBA...but since Greg gave you the > code for selecting all sheets...why don't you try this... > > Just RECORD a macro and while it's recording, go to options and deselect > "gridlines", "row and column headers", "outline symbols", "zero Values", > .....then you can add Greg's code for selecting all sheets to the macro after > you record the other stuff? > > > Linda F. Johnson, M.A., MOS > Linda's Computer Stop > http://personal-computer-tutor.com > Free e-Books, Newsletter, and tutorials > From: "Ray Blake" <ray@xxxxxxxxx> > Subject: [mso] Re: Excel visual basic command > Date: Tue, 16 Sep 2003 06:40:14 +0100 > > Don, > > The VBA line you're looking for is: > > Sheets.Select > > Ray Blake > > _____________ > > This email is from Ray Blake, Head of Software Design, GR Business > Process Solutions. It is confidential and intended for the addressee > only. The contents are private and may be legally privileged. If you > receive this email in error we would be grateful if you would advise the > sender and delete the email from your system. > > For more information on the services that we offer please visit us at > our website: - www.grbps.com --------------------------------------------- This message was sent using Road Runner's Web-based e-mail. ************************************************************* You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or MicrosoftOffice@xxxxxxxxxxxxxxxx To send mail to the group, simply address it to mso@xxxxxxxxxxxxx To Unsubscribe from this group, send an email to mso-request@xxxxxxxxxxxxx with the word "unsubscribe" (without the quotes) in the subject line. Or, visit the group's homepage and use the dropdown menu. This will also allow you to change your email settings to digest or vacation (no mail). //www.freelists.org/webpage/mso To be able to use the files section for sharing files with the group, send a request to mso-moderators@xxxxxxxxxxxxx and you will be sent an invitation with instructions. Once you are a member of the files group, you can go here to upload/download files: http://www.smartgroups.com/vault/msofiles *************************************************************