首页 › 实战技术 › 解除合并单元格后保持原来的数据vba

nnsea 发表于 2023-10-26 22:44:50

解除合并单元格后保持原来的数据vba

Sub 解除合并单元格后保持原来的数据()
Dim b%, rng As Range
    For Each rng In Selection
      b = rng.MergeArea.Count
      rng.UnMerge
      rng.Resize(b) = rng
    Next
End Sub

查看完整版本: 解除合并单元格后保持原来的数据vba