vba: count non colored

[montecarlo2012]

Hello Mr. Excel Experts.

Sub Basic_Programming()
Dim I As Integer, k As Integer
lastrow = Cells(Rows.Count, "B").End(xlUp).Row

I = 4  '---------------------------------------------------------------[start Cell B4]
If Cells(I, "B").Value = vbYellow Then '-----------------[count until yellow is found]
k = Cells(Rows.Count, "B").End(xlUp).Row
End If
For k = 4 To lastrow
        k = k + 1
Next k
Range("B1").Value = k
End Sub

This is a Basic Idea, I tried, and get wrong answer. I want to count only the cells without color,
I fill the color manually, no formatting, the values don't go by any pattern, and look for a code

I was expecting 5 as an answer, but I got 12, I am trying to keep AS SIMPLE OR BASIC AS POSSIBLE,
Thanks.

 

[Rick Rothstein]

I really appreciate your invitation I have my workbook here:

Oh, you are using Google Sheets... I do not know anything about Google Sheets. I test all the code I post beforehand, so if the code I have given you doesn't work, I am guessing it has something to do with the difference between it and Excel (what this forum is designed to answer questions about).

 

[montecarlo2012]

Rick Rothstein the Great.
Thank you Sir for spent time in my post, I am glad I mentioned something that call your attention (google Sheets).
Differnces, really tricky.

really good subject.
That kind of question, is what I called the "Octopus question", I don't know which of the 8 soft-limbed walk through out.
Thank you so much Rick Rothstein