Change

With Cells

to

With Rand("D:D")


HTH,
Bernie
MS Excel MVP

The only question I have now is I only want it to look in column D for
this,
not the whole document because there might be the word "total in other
columns....