I tryed your code but we misunderstood. Your code select the first 50 Rows on the Sheet1, but I wan't to select first 50 Lines (Shape Objects). Lines were draw with: ActiveSheet.Shapes.AddLine(BeginX, Beginy, EndX, EndY)
Any suggestion?
Drile
Sorry to be unclear, inconcised...I hope that this code will help you:
Dim n_Rows_LINE As Integer
dim Group as String
dim Layerji_Array() as Variant
For n_Rows_LINE = 1 To 50
Group = """" & n_Rows_LINE & """"
ReDim Preserve Layerji_Array(n_Rows_LINE)
Layerji_Array(n_Rows_LINE) =...
Hello
I already posted this problem, but I'm still struggling with my code. So I will make my problem a little different (Raypayette, thank you for you answer’s):
How should I group the first 50 from 100 lines on the Sheet1. I know that I can:
ActiveSheet.Shapes.Range(Array("Line 6", "Line...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.