Set wbNew = Workbooks.Add
wbNew.Close SaveChanges:=True, Filename:=ThisWorkbook.Path & _
Application.PathSeparator & "Chunk" & lCopy & "Rows" & lLoop & _
"-" & lLoop + filesize
其中最末段的 lCopy , lLoop , lLoop , filesize
是變數,依自訂需求指定檔名
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: #19ssU0ko