SaveAs Method changes Worksheet Name
 

I am using the following code in a form running from a Macro in Exce
2002:
filesavename = Application.GetSaveAsFilename("", _
fileFilter:="CSV Files (*.CSV), *.csv")

If filesavename < False Then
MsgBox "Save As " & filesavename
End If
ActiveWorkbook.SaveAs filesavename, FileFormat:=xlCSV

The workbook saves as a new CSV file but changes the name of the activ
sheet.
What can I do about this?

Thank

--
nmager
-----------------------------------------------------------------------
nmagerl's Profile: http://www.msusenet.com/member.php?userid=161
View this thread: http://www.msusenet.com/t-187045632