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

总结

分享:

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

相关推荐
小张是铁粉23 分钟前
oracle的内存架构学习
数据库·学习·oracle·架构
HERR_QQ33 分钟前
【unify】unify的微信小程序开发学习 (to be continued)
学习·微信小程序·小程序
码荼10 小时前
学习开发之hashmap
java·python·学习·哈希算法·个人开发·小白学开发·不花钱不花时间crud
武昌库里写JAVA11 小时前
Oracle如何使用序列 Oracle序列使用教程
java·开发语言·spring boot·学习·课程设计
祁思妙想11 小时前
八股学习(三)---MySQL
数据库·学习·mysql
amazinging12 小时前
北京-4年功能测试2年空窗-报培训班学测开-第四十一天
python·学习·appium
Jyywww12112 小时前
微信小程序学习笔记
笔记·学习·微信小程序
amazinging12 小时前
北京-4年功能测试2年空窗-报培训班学测开-第三十九天
python·学习·appium
每次的天空13 小时前
Android-自定义View的实战学习总结
android·学习·kotlin·音视频
重庆小透明13 小时前
力扣刷题记录【1】146.LRU缓存
java·后端·学习·算法·leetcode·缓存