Excel单元格取消合并后怎么自动填充空白单元格

在excel中，归并单位格打消归并后，会有良多空白单位格，若是要把这些空白单位格填充为归并单位格时的内容，需要怎么操作呢，网上有一些定位空值，在输入公式的方式，我就不再反复这种方式了，今天和大师分享下经由过程VBA主动化填充的方式。

东西/原料

• Office excel 2010以上版本

方式/步调

1. 1

   起首打开一份excel表格，点击“开辟东西”→“Visual Basic”进入编程界面。

   
2. 2

   右键选中当前工作簿名字，在右键菜单中选择“插入”→“模块”。

   
3. 3

   将下面代码复制粘贴到代码界面中。

   Sub 打消归并单位格并填充空白单位格()

       Dim rng As Range

       

       Set rng = Selection.Cells

       

       arr = rng.Value

       

       rng.UnMerge

       

       For i = 1 To UBound(arr, 1)

       

           If arr(i, 1) = "" Then

           

               arr(i, 1) = arr(i - 1, 1)

               

           End If

           

       Next

       

       rng.Value = arr

       

   End Sub

   
4. 4

   保留后，返回excel本家儿界面。选中要打消归并单位格并主动填充空白单位格的区域。

   
5. 5

   点击“开辟东西”→“宏”，选择“打消归并单位格并填充空白单位格”的宏，然后点击“运行”。

   
6. 6

   可以看到，归并单位格被打消归并了，而且空白单位格都被填充为归并单位格时的内容，结果如图：