I have several named ranges I would like to run a process on, how to iterate/loop across a number of named ranges

[Biff Malibu 636]

Hello, and thank you for taking the time to read and help me with what is probably a simple issue, but I can't seem to figure it out. I have a script of code I'd like to run on several named ranges (a ranking feature). My question is how do I take a list of named ranges and loop through them. My sheet looks like this:

I would like to run the following script of code on "US Sectors Continued"

Sub ADD_RANKS()
'need to learn how to loop through named ranges
Dim cell As Range
Dim i As Integer
i = 1
For Each cell In Range("EUROPEAFRICA")
    If cell.Column = 1 Then
    
    cell.Offset(0, 2).Value = i
    i = i + 1
    End If
Next

End Sub

thank you for any help!
regards,
Tony

 

[Biff Malibu 636]

Note for simplicity sake I have a column of named ranges that I'd like to iterate through

 

[Jon Peltier]

Put your list of Names in column E starting in E4, and use this code to cycle through the list:

Sub CycleThroughNames()
  Dim c As Range
  For Each c In ActiveSheet.Range("E4:E25").Cells
    If Len(c.Value) > 0 Then
      Dim cel As Range
      For Each cel In ActiveSheet.Range(c.Value).Cells
        '' do the thing
        ''
      Next
    End If
  Next
End Sub

 

[Biff Malibu 636]

The solution works perfectly! Thank you very very much!
Kindest Regards,
Tony