Queries :: Exporting Query To Excel Causes SQL To Be Deleted

I wrote a SQL query that works fine. But when I call a custom function to export it to Excel, my query SQL will get deleted (not consistent). All that is left of the script is SELECT;

MS Access 2007, Windows 7.

Here's how I call the function:

Code:
Private Sub exportQryCustStatusAnalysisLite_Click()
Call ExcelSmsOutput("Query", "qry_custStatusAnalysisExport", "qry_custStatusAnalysisExport", Forms![frm_main].[filePath])
End Sub

Here's the custom function:

Code:
Public Function ExcelSmsOutput(objectType As Variant, prefixFileName As Variant, objectName As Variant, filePath As Variant)
Dim outputFileName As String
outputFileName = prefixFileName & " " & Format(Now(), "yyyy-mm-dd hhh mmm sss")

[Code] .....