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

总结

分享:

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

相关推荐
charlie11451419121 分钟前
从模仿到掌握:尝试一下Native CSS手写一个好看的按钮
前端·css·学习·ui
弈风千秋万古愁30 分钟前
【PID】连续PID和数字PID chapter1(补充) 学习笔记
笔记·学习·算法·matlab
im_AMBER2 小时前
JavaScript 03 【基础语法学习】
javascript·笔记·学习
Yupureki2 小时前
从零开始的C++学习生活 18:C语言复习课(期末速通)
c语言·数据结构·c++·学习·visual studio
做科研的周师兄2 小时前
【机器学习入门】9.2:感知机 Python 实践代码模板(苹果香蕉分类任务适配)
人工智能·python·学习·机器学习·分类·数据挖掘·numpy
椰羊sqrt4 小时前
MetaTwo靶机实战:SQL注入到权限提升全解析
python·学习·网络安全
老师可可4 小时前
成绩查询系统如何制作?
经验分享·学习·小程序·excel·学习方法
Larry_Yanan4 小时前
QML学习笔记(四十七)QML与C++交互:上下文对象
c++·笔记·qt·学习·ui
Vizio<4 小时前
《模仿人类皮肤层与环层小体的社交交互机器人皮肤》2024 IEEE/ASME TMECH 论文解读
人工智能·笔记·学习·机器人·交互·触觉传感器
星光一影4 小时前
基于Jdk17+SpringBoot3AI智慧教育平台,告别低效学习,AI精准导学 + 新架构稳跑
java·学习·mysql