View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
JW[_2_] JW[_2_] is offline
external usenet poster
 
Posts: 638
Default Write Worksheet To Network Directory

On Oct 8, 5:15 pm, Joe K. <Joe wrote:
I would like to output Sheet1 worksheet contents to a CSV file format to a
certain network directory listed below. I would like the file name to be in
the format listed below.

Network directory: F:\Marketing\June07
File Name Format : LINKSYS_YYMMDDHH Today
Today's File Name: LINKSYS_07100816

Please help me complete this task.

Thanks,


Sub tester()
Dim networkDirectory As String
Dim fName As String
networkDirectory = "F:\Marketing\June07\"
fName = "LINKSYS_" & Format(Now(), "yymmddhh")
ActiveSheet.SaveAs networkDirectory & fName, xlCSV
End Sub