Group Lines?

[Dr.Ile]

Hello

How should I group the for example 100 lines whith macro. I know that I can:
ActiveSheet.Shapes.Range(Array("Line 6", "Line 5"....)).Select
Selection.ShapeRange.Group.Select
But what if I won't work with their names (Line 6...) and group just the first 50 lines.

Thank you in advance

Dr.ile

[raypayette]

I don't understand your problem!