Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails
Sub SAVEASCSV() Dim ws As Worksheet, newWb As Workbook Application.ScreenUpdating = False For Each ws In Sheets(Array("CONTRACT", "LOC", "REINS")) ws.Copy Set newWb = ActiveWorkbook With newWb .SAVEAS ws.Name, xlCSV .Close (False) End With Next ws Application.ScreenUpdating = True End Sub
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
7 Experts available now in Live!