【VBA】单元格合并思路

原创

于 2017-05-28 02:50:36 发布 · 1k 阅读

CC 4.0 BY-SA版权

文章标签：

本文介绍了使用VBA来实现向下合并工作表中连续的空白单元格的方法，核心在于利用Range对象的End属性，它能帮助找到第一个非空单元格的位置，从而实现智能合并。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

1. 需求
向下合并空白单元格

2. 实现代码

Function mergeR()

    Dim intR1, intR2

    intR1 = [B1048576].End(xlUp).Row 'B列最后一个单元格向上查找，返回不为空的单元格行号

    For i = 1 To intR1

200万优质内容无限畅学