[已解决]怎么另存为变量.xls格式？江湖救急！！！

nancy66317

随便一个.xlsx的文件，要保存为一个.xls文件，因为文件名是变量，不知道那个VBA语句怎么写？
录制宏是这样的：
Sub 宏3()
    ActiveWorkbook.SaveAs Filename:="C:\Users\Administrator\Desktop\工作簿2.xls",
End Sub
我想要这样：
Sub 宏3()
M=保暖
    ActiveWorkbook.SaveAs Filename:="C:\Users\Administrator\Desktop\m.xls"
     End Su
这里变量M不知道要怎么表达？上面的结果是命名成了m
如果表达成这样ActiveWorkbook.SaveAs Filename:="C:\Users\Administrator\Desktop\"&m
，VBA是可以的，但不是想要的XLS格式 ?

最佳答案

月排行榜 / 总排行榜

ppp710715

2015-1-14 13:34

1. Sub 宏3()
   
2.     M = "保暖"
   
3.     ActiveWorkbook.SaveAs Filename:="C:\Users\Administrator\Desktop" & M & ".xls"
   
4. End Sub

复制代码

跳转到最佳答案楼层

dsmch

1. "C:\Users\Administrator\Desktop" & M &".xls"

复制代码

ppp710715

1. Sub 宏3()
   
2.     M = "保暖"
   
3.     ActiveWorkbook.SaveAs Filename:="C:\Users\Administrator\Desktop" & M & ".xls"
   
4. End Sub

复制代码