excel常用宏
拆分单元格赋值Sub 拆分填充()Dim x As RangeFor Each x In ActiveSheet.UsedRange.CellsIf x.MergeCells Thenx.Sel