发布网友 发布时间:2022-02-25 18:22
共1个回答
热心网友 时间:2022-02-25 19:51
这个用代码来做,选择需要取消合并的数据,然后点击按钮实现
Sub avg()
For Each Rng In Selection
n = Rng.MergeArea.Count
Rng.UnMerge
If Application.Sum(Rng.Resize(n)) = 0 Then
Rng = 0
Else
Rng.Resize(n) = Rng / n
End If
Next
End Sub