View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Gary''s Student Gary''s Student is offline
external usenet poster
 
Posts: 11,058
Default Save File in Desired Location & Name

Change the names to protect the innocent:

Sub SaveProperly()
Dim wb As Workbook, dt As String
Set wb = ActiveWorkbook
st = Format(Date - 1, "mm_dd_yyyy")
fname = "C:\Documents and Settings\jravensw\Desktop\Tariff IHE - " & st &
".xls"
MsgBox st
wb.SaveAs Filename:=fname
End Sub

--
Gary''s Student - gsnu200909


"Kam" wrote:

Hi,

Need ur help to design macro which can save the file in desired location &
save with desired name. I do run a Macro on daily basis, which pulls data
from system based on Yesterday dates. Can you please write a macro.

File Name Should be : Tariff IHE - "Yesterday Date"
File Location : C:My Documents/Reports/

Best Regards,
Kam