Macro not saving file to correct path

Hello,
I have a macro that I run on a file each morning that formats it, saves it to my network drive(I, emails a copy, then closes. But I am unable to get it to save to the correct folder in the network drive. It will save in the I: but not in a subfolder. If I try to save to my desktop, it does not save it.
This is the section of the macro that does the saving:
Range("A1").Select
Path = "I:"
fname = Format(Date, "mm-dd-yyyy") & "__WPOT_IP_Report"
ActiveWorkbook.SaveAs Filename:=Path & fname, FileFormat:= _
xlOpenXMLWorkbook, CreateBackup:=False

When I enter the path to the folder(daily report) I want to save, it saves it to the I drive with the name of the folder at the beginning of the file name. Example: "Daily Report_10-03-2013_WPOT_IP_Report". I also tried saving to my desktop "C:\Users\pricer\Desktop" but it just dissapears.

Can you tell from what I have in my macro what might be causing this?

Thanks for the tip.
When I tried what you have ( I think I did it right), the line of code turns red and I get "Compile Error: Expected: End of Statement and the word "Format" is highlighted.
Here is what I put in:
sPathAndFileName = """" & "I:\Patient_Admissions" & "\" Format(Date, "mm-dd-yyyy") & "__WPOT_IP_Report" & """"
ActiveWorkbook.SaveAs Filename:=sPathAndFileName, FileFormat:= _
xlOpenXMLWorkbook, CreateBackup:=False

Sorry, my fault. There should be an ampersand '&' after the "\"

You had:

Please Login or Register  to view this content.

That helped! But now it's not saving as an excel file. Sorry for not getting this, but I really appreciate your help. Here is what I have.

sPathAndFileName = """" & "I:\Patient_Admissions" & "\" & Format(Date, "mm-dd-yyyy") & "__WPOT_IP_Report" & """"
ActiveWorkbook.SaveAs Filename:=sPathAndFileName, FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

I'm no expert on Excel File formats, but your problem is probably:

FileFormat:=xlOpenXMLWorkbook

I would try either 'xlWorkbookDefault' or 'xlWorkbookNormal' which will probably save
the workbook for you in Excel 2010 format.

I use Excel 2003 and use:

Please Login or Register  to view this content.

For a more complete list see:
http://msdn.microsoft.com/en-us/libr...ileformat.aspx

Well, the last bit of advice would not work for me. But I went back to your first reply and tested it again with the "\" and it worked. I think I was trying to combine that bit of advice with the other steps you said I might need and it would not work. Now it all seems to be working fine. Thanks for your help!