vba学习系列(6)--将指定区域数据偶数列和奇数列分类汇总

系列文章目录

文章目录


前言

一、需求

将D2:CQ21,范围的数据,偶数列汇总到A列,奇数列汇总到B列;

二、使用步骤

1.引入库

代码如下(示例):

c 复制代码
Sub test()
for i = 4 To Range("AAA1").End(xlToLeft).Column
	If Cells(1, i) = "a" Then 
		arr = Range(Cells(2,i),Cells(21,i))
		r1 = Range("A655356").End(xlUp).Row + 1
		Cells(r1,1).Resize(UBound(arr),1) = arr
	Else
		brr = Range(Cells(2,i),Cells(21,i))
		r2 = Range("B655356").End(xlUp).Row + 1 
		Cells(r2,2).Resize(UBound(brr),1) = brr
	End If
Next
End Sub

总结

分享:

一个人要忍耐这样的羞辱,这本身就需要更大的勇气,当一个人的心中有种更高的目标去攀登时,他就不会在意脚下的泥泞,他才可能用最平静的方式去面对一般人难以忍受的痛苦;

相关推荐
Larry_Yanan7 小时前
QML学习笔记(三十四)QML的GroupBox、RadioButton
c++·笔记·qt·学习·ui
im_AMBER7 小时前
杂记 14
前端·笔记·学习·web
立志成为大牛的小牛8 小时前
数据结构——十七、线索二叉树找前驱与后继(王道408)
数据结构·笔记·学习·程序人生·考研·算法
张永清-老清9 小时前
每周读书与学习->初识JMeter 元件(五)
学习·jmeter·性能调优·jmeter性能测试·性能分析·干货分享·每周读书与学习
低音钢琴9 小时前
【从零开始构建性能测试体系-02】 Apache JMeter 取样器指南:从入门到精通
学习·jmeter·apache
im_AMBER9 小时前
Web 开发 27
前端·javascript·笔记·后端·学习·web
cimeo9 小时前
【C 学习】12.2-函数补充
学习·c#
微露清风10 小时前
系统性学习C++-第五讲-内存管理
java·c++·学习
小张的博客之旅12 小时前
2025年“羊城杯”网络安全大赛 线上初赛 (WriteUp)
python·学习·网络安全
~无忧花开~13 小时前
JavaScript学习笔记(二十八):JavaScript性能优化全攻略
开发语言·前端·javascript·笔记·学习·性能优化·js