Maybe this:
![]()
sFile = Format(.Range("C1"), "MM-DD-YYYY") & " thru " & Format(.Range("C3"), "MM-DD-YYYY") & ".xlsm" End With ActiveWorkbook.SaveAs Filename:="U:\PRODUCTION\C shift\Saved Safe Card Count\" & sFile, FileFormat:=52
Maybe this:
![]()
sFile = Format(.Range("C1"), "MM-DD-YYYY") & " thru " & Format(.Range("C3"), "MM-DD-YYYY") & ".xlsm" End With ActiveWorkbook.SaveAs Filename:="U:\PRODUCTION\C shift\Saved Safe Card Count\" & sFile, FileFormat:=52
_________________
Microsoft MVP 2010 - Excel
Visit: Jerry Beaucaire's Excel Files & Macros
If you've been given good help, use theicon below to give reputation feedback, it is appreciated.
Always put your code between code tags. [CODE] your code here [/CODE]
?None of us is as good as all of us? - Ray Kroc
?Actually, I *am* a rocket scientist.? - JB (little ones count!)
That did not work getting same code.I have attached a copy.
9-8-14 thru 10-5-14.xlsm
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks