摘要:
Sub ListSheetNames() Dim fso As Object, folder As Object, file As Object Dim wb As Workbook, ws As Worksheet, newWs As Worksheet Dim i As Integer, j 阅读全文
posted @ 2025-03-15 23:37
yclizq
阅读(13)
评论(0)
推荐(0)
摘要:
'以下代码是将某个文件夹下的多个excel文件中的某个Sheet进行合并到一个文件的某个Sheet页中 '以下是多文件单sheet页操作 注意此语句多一个标题行 Sub MergeAllSheetsWithHeaders() Dim path As String, file As String Di 阅读全文
posted @ 2025-03-15 21:08
yclizq
阅读(169)
评论(0)
推荐(0)