Quote Originally Posted by frostnl View Post
Try:

Private Sub Submit_Click()

Dim wkbNew As Workbook
Set wkbNew = Workbooks.Add

(and a bunch of VBA code for accounting)

wkbNew.SaveAs textbox2.value & "\" & textbox1.value & "_Accounting_" & Format(Now, "ddmmyyyy") & ".xls"
   
End Sub
Worked Perfectly!!!!! Thanks!!