Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Saving Individual Worksheets
I am using this code to save my workbooks:
'-------------------------------------------------------------------------- Sub SaveAsTodaysDate() Dim sFileName As String, sPath As String Application.ScreenUpdating = False sPath = "C:\LOGS\" 'change path here sFileName = "NW Failures " + Format(Now(), "dd.mm.yyyy") & ".xls" ActiveWorkbook.SaveAs (sPath & sFileName) Application.ScreenUpdating = True MsgBox ("File - " & sFileName & " - Saved Successfully"), vbOKOnly End Sub '-------------------------------------------------------------------------- This save the workbook with the date of creation. What i want to do is save an individual worksheet with the sam filename formatting as above. The worksheets i have are called "PASS" and "FAIL". Can anyine suggest a way to do this please. TI -- Message posted from http://www.ExcelForum.com |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Put data into individual worksheets | New Users to Excel | |||
Master Worksheets and Individual Worksheets | Excel Worksheet Functions | |||
Email individual worksheets? | New Users to Excel | |||
Saving worksheets within workbooks as individual files | Excel Worksheet Functions | |||
Saving workbook sheets to individual excel files | Excel Programming |