Find all named cells with a specific character in the name and a blank value
<p>I'm trying to find each named cell where the name ends with _ and the value of the cell is blank. This is the code I'm using to no avail. (The msgbox is just to help me see how many it finds.) The _ is to make the cell required, if you know a better way (without having to do each one at a time) please let me know. Thanks!</p>

<pre><code>namedrange = 0

For Each cell In ActiveWorkbook.Names
If Right(cell.Name, 1) = "_" And cell.Value = "" Then
cell.Interior.ColorIndex = 3
namedrange = namedrange + 1
End If
Next cell

MsgBox namedrange
</code></pre>