Dear BeExcel, Ini saya dapat dari internet, bagaimana membuat Data Group dengan hanya memberikan nomor.Macronya bagus untuk contoh belajar variable.
Macronya seperti ini : Option ExplicitSub GroupLikeIDRows() Dim G As Range, U As Range, n As Integer, r As Range Set U = ActiveSheet.UsedRange.Rows: U.ClearOutline For Each r In U Select Case True Case r.Cells(1) = "" Case r.Cells(1, 1) = r.Cells(2, 1) And n = 0 Set G = r.Cells(1, 1): n = 1 Case r.Cells(1, 1) = r.Cells(2, 1) And n > 0 Set G = Union(r.Cells(1, 1), G): n = n + 1 Case r.Cells(1, 1) <> r.Cells(2, 1) And n > 0 Set G = Union(r.Cells(1, 1), G): n = 0: G.Rows.Group End Select Next rEnd Sub Copas Macro pada VBE Sheet (Module1). Selamat mencoba. Salam,HK
