Sub 合并选中列相同内容单元格()Dim rngData As RangeDim i&, lngCol&, lngFirst, lngLastOn Error Resume NextSet rngData = Application.InputBox("请选择要合并的数据列!", Default:=Selection.Address, Type:=8)Set rngData = Intersect(rngData.Parent.UsedRange, rngData)lngCol = rngData.Column 'rngData所在列lngFirst = rngData.RowlngLast = lngFirst + rngData.Rows.Count - 1Application.ScreenUpdating = FalseApplication.DisplayAlerts = FalserngData.Parent.SelectFor i = lngLast To lngFirst + 1 Step -1If Cells(i, lngCol) = Cells(i - 1, lngCol) ThenCells(i - 1, lngCol).Resize(2, 1).MergeEnd IfNextrngData.VerticalAlignment = xlCenterApplication.ScreenUpdating = TrueApplication.DisplayAlerts = TrueMsgBox "合并完成。"
End Sub

01.选中某列

02.开发工具--打开VB--插入模块--复制粘贴--运行

【无标题】EXCEL合并选中列相同内容单元格(VBA)相关推荐

  1. Excel合并同列相同内容单元格

    原表如上所示,目标表如下所示: 具体步骤: 1.排序 选定要合并的列,进行排序 2. 分类汇总 选中首列后,点击工具栏-->数据-->(分级显示)分类汇总效果如上所示 注意注意注意!!!! ...

  2. JAVA poi合并任意列 相同数据单元格

    以下为poi合并单元格 所需要jar如下 commons-collections poi java 1.8 版本 以下为代码 import java.io.FileNotFoundException; ...

  3. Python excel 合并居中值相同的单元格

    前言 这里要说明一下,本文包含的代码其中一部分并不是自己写的,是我找了很多文章拼凑出来的,比如如何找相同内容的单元格.怎么合并.怎么居中等等.出处许多,这边就不一个个放链接了.就当做一份自己写的学习笔 ...

  4. EXCEL 合并两列的内容

    今天客户给了一个EXCEL表,是他们近期的一些数据,要把这个EXCEL中的数据导入我们的数据库. 在处理的过程中,有个时间字段,在数据库里的格式是"yyyy-MM-dd hh:mm:ss&q ...

  5. excel合并两列内容_不要再粘粘粘,合并Excel表格数据,3秒完成

    原创作者: 兰色幻想-赵志东 转自: Excel精英培训 一般情况下,两列数据需要合并,我会推荐用简单的公式: =A2&B2 二般情况下,再连接就不行了,比如C列连接后百分比变成了小数.这时就 ...

  6. EasyExcel合并相同内容单元格及动态标题功能的实现

    相信很多同学都用过EasyExcel做过导出功能,现在阿Q也碰到一个需求,就是要把导出的Excel中内容相同的纵向单元格给合并,然后还需要给Excel设置动态标题,再进行格式定义调整,现将这个功能的实 ...

  7. html多个单元格合并单元格内容,excel怎样快速把多个单元格内容合并 合并多个单元格内容的设置方法...

    excel是我们常用的办公软件,有时我们需要把多个单元个的内容合并到一个单元格里,那么excel怎样快速把多个单元格内容合并?下面小编带来合并多个单元格内容的设置方法,希望对大家有所帮助. 合并多个单 ...

  8. php单元格字体颜色,PHPExcel API接口用法大全,按模板导入excel,美化excel,导出图片,设置单元格字体颜色背景色边框,合并单元格,设置行高列宽...

    PHPExcel API接口用法大全,按模板导入excel,美化excel,导出图片,设置单元格字体颜色背景色边框,合并单元格,设置行高列宽 2020-08-31 85 一:读取excel表模板$ph ...

  9. 【知识兔】Excel教程:批量合并相同内容单元格神技

    大家好,今天知识兔跟大家分享一下关于批量合并相同内容单元格的方法有哪些,这是一位同学在群里求助的案例,当时群内针对这个问题各位小伙伴们抛出了多种解决方法,索性知识兔小编就整理成专题文章来跟大家分享一下 ...

最新文章

  1. 票据自动处理系统著名研究团队
  2. java 怎么向串口发送指令_idea ssm项目java程序使用十六进制rxtx包向串口发送指令的方法...
  3. 去中心化交易所前路明朗,基于EOS的去中心化交易所力拔头筹
  4. SpringBoot_web开发-SpringMVC自动配置原理
  5. mysql中将int转为_mysql – 将int转换为varchar
  6. 张云飞 201771010143 《面对对象程序设计(java)》第十七周学习总结
  7. Win10之WSL编译Android7.1源码
  8. 数据通信与计算机网络第2版,数据通信与计算机网络(第2版)习题1
  9. python文件都是脚本吗_.py文件是python脚本吗
  10. 火狐firebug和firepath插件安装方法
  11. Swift: 获取系统字体
  12. 第七届“泰迪杯”——个人总结吧
  13. 统计学习导论(ISLR)(二):统计学习概述
  14. python鸡兔同笼头35只_python_鸡兔同笼问题
  15. 《介绍几个常见常用的字符函数》(包括isdigit,isupper,islower,isalpha,isalnum,toupper,tolower)
  16. Visual Leak Detector内存泄漏检测工具,vld使用及原理
  17. Spring 5.X+CXF 3.X 开发SOAP Web Service服务端实例
  18. NTVDM CPU 遇到无效的指令的解决方法大全
  19. (转)如何应用MTCNN和FaceNet模型实现人脸检测及识别
  20. mac系统共享服务器,mac 链接共享服务器

热门文章

  1. 基于Python语言使用RabbitMQ消息队列(三)
  2. java计算句子相似度的代码_4种方法计算句子相似度
  3. 【数据收集】名义变量、序级变量、区间变量、比率变量的理解及例子
  4. android 微信 耗电吗,Android微信朋友圈小视频播放(低耗电量和低内存占用)
  5. 基于NPOI用C#开发的Excel以及表格设置
  6. 关于RDBMS和非RDBMS【数据库系统】
  7. Photoshop学习(二十二):创建木板纹理及凸起
  8. 【ACWing】713. 区间 2
  9. 华为关闭telnet命令_华为AR28-11路由器如何关闭telnet服务?
  10. 利用WPF InkCanvas水墨控件圈选移动笔画