VBA to check if cell is less than 1

[uk747]

Trying to highlight a cell if value in another column is less than 1.

Ideally just wanted to highlight value i.e. 0 -1 -2 etc, but it also highlights blanks

All 3 lines below highlighted the blanks as well as values less than 1

For I = 1 to 100
  If range("a" & I) = 0 then range("b" & I).interior colorindex = 7
  If range("a" & I) <1 then range("b" & I).interior colorindex = 7
  If range("a" & I) < int(1) then range("b" & I).interior colorindex = 7

Next I

 

[gordsky]

maybe something like

For I = 1 to 100
    If range("a" & I) <> ""  AND range("A" & I) <1 then range("b" & I).interior colorindex = 7
Next I

 

[uk747]

Thanks. I actually ended up doing that, but wasn't sure how to do it without using the AND, not sure if there was a way.

I thought using int would work ?