在excel中,归并单位格打消归并后,会有良多空白单位格,若是要把这些空白单位格填充为归并单位格时的内容,需要怎么操作呢,网上有一些定位空值,在输入公式的方式,我就不再反复这种方式了,今天和大师分享下经由过程VBA主动化填充的方式。
首先打开一份excel表格,点击“开辟东西”→“Visual Basic”进入编程界面。
右键选中当前工作簿名字,在右键菜单中选择“插入”→“模块”。
将下面代码复制粘贴到代码界面中。
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
保留后,返回excel本家儿界面。选中要打消归并单位格并主动填充空白单位格的区域。
点击“开辟东西”→“宏”,选择“打消归并单位格并填充空白单位格”的宏,然后点击“运行”。
可以看到,归并单位格被打消归并了,而且空白单位格都被填充为归并单位格时的内容,结果如图:
0 篇文章
如果觉得我的文章对您有用,请随意打赏。你的支持将鼓励我继续创作!