Question

EXCEL中VBA以单元格内容作为为文件名另存？

with workbooks.add
for each t in ("a1:b5", "d1:f5")
range(t)=st.range(t)
next t
.saveas "c:\aaa.xlsx"
msgbox "已经保存:" & .name
.close
end with
end sub

上个回答是存桌面，文件名为aaa
现将这一步改为
1、以Sheet1工作表中，单元格E1、中间加“-”和单元格E2中内容作为文件名另存为桌面，比如E1=您 E2=好 ，文件名为 您-好

Answer 1

代码中保存文件并命名的语句是：
.saveas "c:\aaa.xlsx"
要改变路径和名称修改引号里面的内容就可以了，例如：
.saveas "c:\" & [e1] & "-" [e2] & ".xlsx"

Answer 2

Tname=range("E1") & "-" & range("E2") & ".xlsx"
.saveas "c:\" & Tname