喂喂、小李子上个妾ル:
工作表都在同一个工作薄?alt+f11打开vba编辑窗口,在左边列表框点鼠标右键选插入模块粘贴以下代码后,关闭vba编辑窗口,在工作表页面按alt+f8点选转换CSv,按回车执行或点击执行按钮.该工作薄里所有的工作表都保存在这个工作薄的路径下.文件名就是:工作表名.CSvSUb转换CSv()ipath=thiSWorkbook.pathForn=1toworksheets.countname="\"&sheets(n).name&".CSv"filepath=ipath&nameshee....