
numeroROI = (Cells(Rows.Count, 1).End(xlUp).Row) - 1 Dim indgroup (1 To numeroROI) As Integer |
Dim indgroup() As Integer numeroROI = (Cells(Rows.Count, 1).End(xlUp).Row) - 1 reDim indgroup (1 To numeroROI) |
Dim indgroup() As Long ReDim indgroup(1 To numeroROI) |
