下面的一个语句就可以了:ActiveWorkbook.SaveAs Filename:="C:\A\" * range("a1") & ".csv", FileFormat:=xlCSV 你的单元格aa&bb我不明白是什么意思,我例子语句使用的a1,你自行修改即可。