Katie (and Lauren)

If you must be lazy, here is some code

Sub Macro1()

Application.DisplayAlerts = False
For Each sh In ActiveWorkbook.Worksheets
sh.Move
With ActiveWorkbook
.SaveAs Filename:=sh.Name & ".txt", _
FileFormat:=xlText, _
CreateBackup:=False
.Close
Next sh
Application.DisplayAlerts = True

End Sub

Something to be wary of though. I name the txet file by the sheet name. That
may not be good enough as the sheet name may be replicated in other books.
It may need a better strategy.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Katie" wrote in message
...
Thanks Bob I appreciate it. My girlfriends and I are
just getting lazy I guess. The guys in accounting use
some funky software and our excel values don't translate
I guess. My friend Lauren was like "isn't there a button
you can press to take all the sheets and make them all
individual files, instead of doing one at a time?" Like
I said, I guess were just getting lazy. It's just that
some of our excel files have like a million sheets (more
like 30 but you get the point.) Thanks a bunch!