文件名称:excel 文件、工作表 合并脚本
文件大小:3KB
文件格式:TXT
更新时间:2014-09-28 07:34:08
excel 文件 工作表 合并脚本
excel 文件、工作表 合并脚本 合并工作表 Function LastRow(sh As Worksheet) On Error Resume Next LastRow = sh.Cells.Find(what:="*", _ After:=sh.Range("A1"), _ Lookat:=xlPart, _ LookIn:=xlFormulas, _ SearchOrder:=xlByRows, _ SearchDirection:=xlPrevious, _ MatchCase:=False).Row ………………………………