I am trying to do something relatively simple and can't seem to get the copied rows to show up. I would SINCERELY appreciate ANY HELP!!!!

1. I have 10 sheets in a workbook (I inserted all of these based off of the same macro enabled template)
2. I am trying to copy the highest priority data from each of the 9 worksheets into the 10th MASTER SHEET
3. For each of the 9 worksheets I have manually filled column A green (RGB 0,176,80) if it fits the criteria for highest priority
4. I would like to copy all rows with column A green to the MASTER SHEET
5. I would also like to change the fill color in the other 9 sheets to lime green after they have been copied into the MASTER SHEET

*I will also need to consistently add new data to the 9 other sheets and run the macro consistently to keep up with the new data that I fill green and designate as highest priority

i.e. 1 of the 9 sheets is called "MemorialW"
sheet 10 or the MASTER SHEET is called "MASTER PROSPECTS"


I have tried so many different ways to achieve this goal and have come closest with this:

Sub copybased_on_cell_interior_rgb()

Const green As String = "R:0 G:176 B:80" 'RGB(0, 176, 80)
Dim i As Long, FBlnkRow As Long

FBlnkRow = Worksheets("MASTERprospects").Range("A" & Rows.Count).End(xlUp).Offset(1).Row

With Worksheets("MemorialW")
For i = 2 To .Range("A" & .Rows.Count).End(xlUp).Row
Select Case rgb_valz(.Range("A" & i))
Case green
.Range("A" & i & ":V" & i).Copy Worksheets("MASTERprospects").Range("A" & Rows.Count).End(xlUp).Offset(1)
.Range("A" & i & ":V" & i).Interior.Color = RGB(0, 176, 80)
End Select
Next i
End With
End Sub


Public Function rgb_valz(rng As Range) As String
'Credits: snb
rgb_valz = _
"R:" & rng.Interior.Color Mod 256 & _
" G:" & (rng.Interior.Color Mod 256 ^ 2) \ 256 & _
" B:" & rng.Interior.Color \ 256 ^ 2
End Function


THANK YOU!!!!