1 / 1
文档名称:

EXCEL合并工作表宏代码.doc

格式:doc   大小:71KB   页数:1页
下载后只包含 1 个 DOC 格式的文档,没有任何的图纸或源代码,查看文件列表

如果您已付费下载过本站文档,您可以点这里二次下载

分享

预览

EXCEL合并工作表宏代码.doc

上传人:2072510724 2019/8/2 文件大小:71 KB

下载得到文件列表

EXCEL合并工作表宏代码.doc

文档介绍

文档介绍:bineWorkbooks()=FalseFilesToOpen=(FileFilter:="MicroSoftExcel文件(*.xls),*.xls",MultiSelect:=True,Title:="要合并的文件")IfTypeName(FilesToOpen)="Boolean"thenMsgBox"没有选中文件"GotoExitHandlerendifx=1Whilex<=UBound(filestoopen):=filestoopen(x)Sheets().MoveAfter:=()x=x+1WendExitHandler:=TrueExitSubErrHandler: