Thread: Extra save
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Andrew[_37_] Andrew[_37_] is offline
external usenet poster
 
Posts: 10
Default Extra save

hi Al
Below i have what i use to save a file as an i.d number once it has been updated by a workbook macro. Somehow i want to save the file as it's current name before this kicks in, but after it has updated the number. The text below is saved in the worksheet module

Private Sub Worksheet_Change(ByVal Target As Range
If Not Application.Intersect(Target, Range("I2")) Is Nothing The
ThisWorkbook.SaveAs Filename:="C:\My Documents\UW Forms\" & Target.Value, FileFormat:=xlWorkbookNorma
End I
End Su

The current path of the original file is "C:\My Documents\UW Forms\UW Template.xlt

Any Suggestions more than welcome

Thank