excel vba unmerge sheet

ThisWorkbook.Worksheets("Sheet1").Cells.UnMerge
VasteMonde