用VBA处理吧，表名怎么取？这里直接取名为：表1、表2。。。这里假设你的原始表中不知道多少行数据，6列。Subdd()Dimi&,x&,y&,R&WithSheets("原始表")R=.Range("A65536").End(xlUp).RowIfR...

n=30'建立工作表数量s=5000'数据的总行数Fori=1Ton'Sheets.Add.Name=iNextFori=1Tonx=1Forj=iTosStepnSheets(CStr(i)).Cells(x,1)=Sheets("数据")...

要分表不难，可以使用宏来实现。占个坑，一会把代码发上来。按ALT+F11,双击左侧这个文件名，双击当前工作表名，然后在右侧粘贴以下代码。然后到工作表界面运行aa宏Subaa()DimnewbookAsWorkbooka=ThisWorkbook.Nam...

application.screenupdating=0fori=2to[a1].end(xldown).rowsrep40r=i&":"&i&i","i+40&":"&i+40n=cells(i,1)range(r).copyworkbooks.addactivesheet.pasteact...

1、打开excel首先打开要排序的excel文档，在菜单栏中找到数据，点击打开。2、选择列只会先选中要排序的列，点击列上方全选。3、分隔最后单击列可调用列窗口并根据分隔符对列进行排序就可以了，这样就分开了。

解决如何将一个excel工作表的数据拆分成多个sheet的步骤如下：1.打开Excel表格之后，我们首先在空白表格处依次将要创建的工作表名称按列输入。2.接着我们全选这部分内容，然后点击工具栏中的“插入”，在插入对应的页面内勾选...

Sub数据拆分()Application.ScreenUpdating=False'关闭屏幕刷新DimwbAsWorkbook,stpstp=1000'声明按1000的数据条数拆分。Fori=1To[a65536].End(3).RowStepstp'[A65536],A列数据区不得有...

1、首先点击第二列中的单元格，选择LEFT函数，选择第一列中的前面两个字符。2、点击确定，将单元格往下拉，整一列数据即可完成。3、在第三列中，选择RIGHT函数，选择第一个单元格中后面2个字符。4、做完之后，将数据粘贴...

2、点击表格上方工具栏中的“插入”选项，找到其中的“形状”按钮。3、然后点击“形状”按钮，在其下拉菜单选项中点击“线条”中的一个样式。4、点击后在需要拆分的单元格内拖动鼠标画出一条横线，并设置好位置和样式。5、...

 前不久好几位朋友都问到，如何将一个EXCEL文件里面很多条数据拆分成多个文件，比如一个EXCEL表里面有90万行数据，需要按照每1万行拆分成一个文件，也就是需要将这表里面的90万行数据拆分到90个文件里面。 ...