Skip some part of For-Each Loop

[AlexanderBB]

This is some code I'm writing

  Set iRange = .Range("A" & ThisRow & ":" & HiCol & ThisRow)
                For Each Cel In iRange
                    Set Access = New clsAccess
                    If CRCol(iSheet, Cel) = True Then
                            Match = Access.CR(Cel)
                            ' at this point we want loop to jump to Cell CQ
                        Else
                            Match = Access.cfrm(Cel)  'Returns true or false if cell matches db
                    End If
                    If Match = False Then Stop:  'To Do
                Next

In the line remmed what would be a good approach? I need to skip any cells before CQ.

 

[6StringJazzer]

Do you mean column CQ? If you want to skip cells before column CQ then define iRange to include only columns starting from CQ.

If HiCol < 95 Then HiCol = 95

You're not showing us a complete picture here, so I'm guessing at what you want to do. I don't know what you mean by "jump to Cell CQ" in the context of where you put that comment.

The only other guess I have for you is

                            If Cel.Column >= 95 Then
                               Match = Access.CR(Cel)
                               ' at this point we want loop to jump to Cell CQ
                            End If

 

[AlexanderBB]

Yes it is Column CQ, I'm iterating through the range until a certain point when I want to skip some, then continue.
That point will vary.
I'll try a For-Next Loop and increment the loop counter.

 

[6StringJazzer]

I need to skip any cells before CQ.

iterating through the range until a certain point when I want to skip some

I'm still unclear on what you're trying to do. Are you skipping all columns up to CQ, or up to a certain point then skipping column to CQ?

 

[AlexanderBB]

Yes, the latter. Incrementing the counter to skip some did work. Some columns represent weeks. How many weeks varies. If the last is before
CQ , say it was BD I don't need to look at Cols BE-CP but do want to continue reading Values from CQ.