I broke Save As

[iwilli]

Still learning. I'm trying to create a Macro that several different people will use on different computers. The problem is if I use the "Save As" then it saves the files to my user. This causes the macro not to work on anyone's computer other than mine. What am i doing wrong?

Sub EAR_UPS_CONTACT_IMPORT()
'
' EAR_UPS_CONTACT_IMPORT Macro
' Creates the .csv file to upload to UPS for EARs
'

'
    Sheets("CSEXPORT").Select
    Cells.Select
    Selection.Value = Selection.Value
    Range("A1").Select
    ActiveWorkbook.SaveAs Filename:="C:\Users\iwilli\Desktop\EAR_UPS_Import.csv" _
        , FileFormat:=xlCSV, CreateBackup:=False
End Sub