Write Worksheet To Network Directory

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

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,
 
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,
Click to expand...

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
 
Back
Top