如题
------解决方案--------------------------------------------------------
Sub Macro1()
'
ChDir "C:\Documents and Settings\Administrator\桌面"
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Administrator\桌面\1212.csv", FileFormat:=xlCSV, _
CreateBackup:=False
End Sub
这是录制的宏,如果实在解决不了,请到www.excelhome.net 这里EXCEL高手比较多