合并多个excel sheet页内容到1个sheet页 5秒搞定
新建一个Sheet，命名为“All”（名字可随意）；右键点击新建Sheet，选择查看代码，或者“Alt+F11”键打开VBA编辑窗口。将EXCEL中的多个SHEET中内容合并到一个SHEET中在左侧对应的Sheet“All”上双击，弹出窗口空白处粘贴下面的代码。Sub hb()Dim bt, i, r, c, n, first As Longbt = 1 '表头行数，多行改为对应数值Cells.ClearFor i = 1 To Sheets.CountIf Sheets(i).Name &am
