excel按照固定行数拆分多个
来源:互联网 发布:jquery.cookie.js插件 编辑:程序博客网 时间:2024/05/20 07:33
1 背景:
工作需要,需要把Excel按照固定行数拆分。
解决办法:
1. 生成是提前处理:
简单来说就是按照行数生成多个Excel。
大概逻辑如下:
if(list.size< limit)
{
直接生成Excel
return;
}
else{
// 计算分批次数
int count =list.size/limit;
//循环
for()
{
//分批获取
list.sublist(0,limit)
//处理,生成Excel
//删除
list.sublist.clear()
}
}
2. 当然还有简单的办法,就是Excel直接处理
当前前提是已经导出了一个大的Excel。
1.打开Excel,鼠标不要任何选择。按“Alt”+“f11”.
Sub cfb()Dim r, c, i, WJhangshu, WJshu, bt As Longr = Range("A" & Rows.Count).End(xlUp).Rowc = Cells(1, Columns.Count).End(xlToLeft).Columnbt = 1 'titleWJhangshu = 250 'numWJshu = IIf(r - bt Mod 20000, Int((r - bt) / WJhangshu), Int((r - bt) / WJhangshu) + 1)For i = 0 To WJshu Workbooks.Add Application.DisplayAlerts = False ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & Format(i, String(Len(WJshu), 0)) & ".xlsx" Application.DisplayAlerts = True ThisWorkbook.ActiveSheet.Range("A1").Resize(bt, c).Copy ActiveSheet.Range("A1") ThisWorkbook.ActiveSheet.Range("A" & bt + i * WJhangshu + 1).Resize(WJhangshu, c).Copy _ ActiveSheet.Range("A" & bt + 1) ActiveWorkbook.Close TrueNextEnd Sub
在sheet1贴上以上代码。我们是按照250行来拆分一个的。
2. 切回Excel。Alt+f8.弹出框选择刚才的宏,可以“执行”或者单步执行。
3.核对数据
生成了分割数据文件,可以对比下看看。注意最后一个是空的,可以忽略。
阅读全文
0 0
- excel按照固定行数拆分多个
- excel按行数拆分
- 拆分一个Excel文件为多个
- 将文件按照行数以及顺序拆分成多个文件
- shell命令拆分文本(按照行数、大小、字段值)
- 将一个数组按照固定大小进行拆分成数组
- 数据由一个图层按照要素拆分多个文件或图层,俗称分解、扇出、拆分
- csv批量转xls | excel按行数拆分
- 用户控件--控制一个文本框只允许输入固定多个字符(按照字节计算)
- C#将一个excel工作表根据指定范围拆分为多个excel文件
- 根据目录将含有多个Sheet的Excel拆分成多个Excel
- 按照“规则”拆分字符串
- 怎么拆分一个Excel工作簿中的多个工作表
- 怎么拆分一个Excel工作簿中的多个工作表?
- 将excel的多个工作表拆分成独立的文件
- excel拆分
- 将表某个字符串拆分生成多行数据[经典]
- 下拉框固定行数
- centos6.X 安装lnmp环境
- 细说HTTPS
- Jquery实现确定取消对话框
- 支付宝APP支付 ---服务器开发
- android5.0以上判断APP是否处于前台问题
- excel按照固定行数拆分多个
- c++排序算法
- 理解float clear(转载滴)
- 超时时间已到。超时时间已到,但是尚未从池中获取连接。出现这种情况可能是因为所有池连接均在使用,并且达到了最大池大小。
- 1151: 大整数加法
- java循环嵌套的例子
- 实现上传图片并预览功能
- MQ消息完整流程
- springboot filter使用配置