2、在左侧的“工程资源管理器”窗口中,选中“vbaproject(personal.xls)”(个人宏工作簿)选项。
3、执行“插入→模块”命令,插入一个模块(模块1)。
4、将下述代码输入到右侧的代码编辑窗口中:
sub baocun()
lj = inputbox("请输入文档保存路径")
activeworkbook.saveas filename:=lj & activecell.value & ".xls"
end sub
退出vba编辑状态。
5、以后要保存某个工作簿文档时,先选中作为名称的字符所在的单元格(参见图2),然后执行“工具→宏→宏”命令,打开“宏”对话框(如图3)。