I am trying to put together a form that has a save button on it.
would like the save button to save the information in the text boxes i
a filename I specify. The code I'm working with is as follows:


Code
-------------------
Private Sub Save_Button_Click()

Application.DefaultSaveFormat = xlExcel2003Workbook
Do
fName = Application.GetSaveAsFilename
Loop Until fName < False
ActiveWorkbook.SaveAs Filename:=fName
ActiveWorkbook.Saved = True

End Su
-------------------


For some reason it is not actually saving the information with the for
though (it's just an empty form that is saved). Can someone help m
please (I'm pulling my hair out over here).

Thank you for any input.

jlrope

--
jlrope
-----------------------------------------------------------------------
jlroper's Profile: http://www.excelforum.com/member.php...fo&userid=2670
View this thread: http://www.excelforum.com/showthread.php?threadid=39971