1. 首页
  2. 操作系统
  3. 其他
  4. 多个excle数据合并到一个excle中

多个excle数据合并到一个excle中

上传者: 2019-06-20 23:17:01上传 DOCX文件 235.67KB 热度 36次
Sub合并工作薄()DimFilesToOpenDimxAsIntegerOnErrorGoToErrHandlerApplication.ScreenUpdating=FalseFilesToOpen=Application.GetOpenFilename_(FileFilter:="MicroSoftExcel文件(*.xls),*.xls",_MultiSelect:=True,Title:="要合并的文件")IfTypeName(FilesToOpen)="Boolean"
下载地址
用户评论