Unmerge Cells

[Shay A]

Hi,
Is there a code to perform this action on the entire sheet?

TY

 

[Khalid NGO]

Hi,

Can you not do this without code?
Just select all cells and select Unmerge Cells from Home tab.

If you really want to do this with VBA:

Sub Unmerge2()
    ActiveSheet.Cells.Unmerge
End Sub

And this for entire workbook:

Sub Unmerge()

    Dim wSheet As Worksheet
   
    For Each wSheet In Worksheets
        wSheet.UsedRange.Unmerge
    Next wSheet
End Sub

Regards,