ln = LEN(Range("a1")(i, col).Value)
if ln=6 OR ln=0 then
//do something
end if

"Ron" wrote:

Hi all,

How would I edit this line to allow only a blank cell or 6 digits.

If Len(Range("a1")(i, col).Value) < 6 Then

Thank you for your assistance, Ron