在Excel中，如何分隔重复值以更清晰的格式显示？

我可能会问这个错误，但我绝对不是专家。 有没有更快的方式来分离excel后sorting重复值？ 看到我需要的附件图像。 图像1显示的是原始数据，而图像2显示了我希望如何格式化数据，但没有手动执行。

Answer 1

使用启用macros的工作簿（.xlsm），可以遍历每行，检测给定列中的更改，然后在检测到更改时在上面插入空白行。 看下面的代码：

Sub SeparateGroups() Dim lastRowIdx As Integer lastRowIdx = Range("A1").End(xlDown).Row() Dim testRowIdx As Integer Dim previousData As String Dim testData As String previousData = Range("A1").Value For testRowIdx = 2 To lastRowIdx testData = Range("A" & testRowIdx).Value If (testData <> previousData) Then Rows(testRowIdx).Insert shift:=xlShiftDown lastRowIdx = lastRow + 1 End If previousData = testData Next End Sub