Repost for additional information
Hello
Sorry for the repost but the my OP got buried last week and Im still confused...
I am saving one sheet Table! from my spreadsheet as an .xls and also as .csv with the following code...
ScreenUpdating = Fals
Worksheets("Table").Cop
ActiveWorkbook.SaveAs "\\Dfs01\shares\Groupdirs\0535\Table" & Range("B56") & ".xls
ActiveWorkbook.SaveAs "g:\data\table" & Range("B56") & ".xls
ActiveWorkbook.SendMail Recipients:=Array("My distribution list"
ActiveSheet.Cop
ActiveWorkbook.SaveAs "\\Dfs01\shares\Groupdirs\0535\Table" & Range("B56")" & Range("B56") & ".csv", FileFormat:=xlCS
ActiveWorkbook.Close SaveChanges:=Fals
ActiveWorkbook.Close SaveChanges:=Fals
ScreenUpdating = Tru
End Su
In the save I want to save just the values no links, no macros, et
Don Guillett (Not Bob) Graciousliy provided the following code to accomplish this but I have tried adding it in several places and cant get it to work. Where do I need to put it in my original code
With ActiveSheet.UsedRang
...Value = .Valu
End Wit
Thanks
Henr
|