IF statement for fill color?

[paquirl]

After filtering a column for a fill color yellow:

ActiveSheet.Range("$A$1:$AB$1217").AutoFilter Field:=11, Criteria1:=RGB(255 _
        , 255, 0), Operator:=xlFilterCellColor

I want to then do an IF THEN logic command as follows: IF no yellow filled cells exist in Field:=11, THEN skip to another step (4 steps down). Can anyone help me figure out how to do this IF THEN command?

 

[jorismoerings]

deleted

 

[jorismoerings]

try this:

Sub step4down()

Dim CountCcolor As Long
Set range_data = Range("$K$1:$K$1217")

For Each x In range_data
    If x.Interior.Color = RGB(255, 255, 0) Then
        CountCcolor = CountCcolor + 1
    End If
Next x

If CountCcolor = 0 Then GoTo step4down Else ActiveSheet.Range("$A$1:$AB$1217").AutoFilter Field:=11, Criteria1:=RGB(255 _
        , 255, 0), Operator:=xlFilterCellColor _
    
step1down:
    
step2down:

step3down:

step4down:
MsgBox "4 Steps Down"

End Sub

 

[paquirl]

I'm trying to comprehend what you wrote lol

 

[paquirl]

i wish there were a way to number each line of code so i could do an if statement to say jump to line X if certain criteria is met.

 

[jeffreybrown]

Cross Posted

Please see: A message to forum cross posters

 

[paquirl]

i get it now .. i'm not supposed to post across two different forum sites. did not know that, sorry

 

[paquirl]

I have abandoned the other post so there's no cross-posting on this topic now.
Joris, what do you think of modifying your idea a little. Instead of doing the stepdown, I decided it would be easier on our end to just make the subroutine end of there is no yellow. So the IF statement would just be, IF yellow-filled cells exist, filter for them. IF no yellow-filled cells exist in the column, do not perform a filter, just END SUB

Potentially this could be done before the filter process? Or does the filter method have to be used to determine IF yellow-filled cells are present in the column?

Seems like the cleanest logic would be:
IF no yellow-filled cells in column X, THEN END SUB
IF yellow-filled cells do exist in column X, filter for them.

 

[paquirl]

https://www.excelforum.com/excel-pr...-if-statement-for-fill-color.html#post4660022

following rule by linking to other post.

 

[paquirl]

Trying to figure out the cleanest order of logic here ...