excel
把要合并的
excel文件全放进一个文件夹里，每个文件里都整点简单的数据。 然后在这个文件夹里新建一个
excel文件，改名叫8。 接着打开这个8，按Alt+F11，或者右键sheet1那个标签，选查看代码。 弹出窗口后，开始贴代码。注意：如果你是用Alt+F11打开的，可能找不到贴代码的地方，这时候点左上角的工程-
VBA Project那边，双击Sheet1，才能打开代码框。用右键方式进来的就直接能贴。 贴上下面这段代码： Sub CombineFiles() Dim path As String Dim FileName As String Dim LastCell As Range Dim Wkb As Workbook Dim WS As Worksheet Dim ThisWB As String
Dim MyDir As String MyDir = ThisWorkbook.path & 'ChDriveLeft(MyDir, 1) 'find all the ex
