Increasing Target.Address

[mmartinez13]

I am wanting to print a label after every 8th cell is highlighted. Instead of an "IF" statement containing:

If Target.Address = "$E$9" Or If Target.Address = "$E$17" If Target.Address = "$E$25".............................. Then

How can I accomplish this without having to enter the ridiculous amount of "Or" statements?

 

[VoG]

Try

If target.Column = 5 And target.Row Mod 8 = 1 Then

 

[Andrew Poulsom]

Maybe:

If Target.Row Mod 8 = 1 Then

 

[Jonmo1]

Welcome to the board..
Try

If Not Intersect(Target, Range("E:E")) Is Nothing Then
    If (Target.Row - 1) Mod 8 = 0 Then
        'code here
    End If
End If

Hope that helps

 

[MickG]

Perhaps:-

If Target.Row Mod 8 = 0 Then

Mick

 

[mmartinez13]

Sorry, let me change what I meant to type.

I currently have this:

If Target.Address = "$E$9" Or Target.Address = "$E$17" Or Target.Address = "$E$25" Or Target.Address = "$E$9" Then

After E9 is highlighted, I print a label. What I would like is when cells E17, E25, E33, E41, E49,............. I would like labels printed also.

Basically my users are scanning data which enters cells in columns A through E. Once the data is scanned in cell E, I return back to cell A. Once I get to E9, I want to print a label. Once I get to E17, I want to print a label, and every 8th cell down the column.

If you can't tell, I am quite the beginner. Thanks for all the replies/help. You guys are great.

 

[VoG]

Did you actually try any of the suggestions?