Can't see anything, works fine for me. What code do you have before it?

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Maury Markowitz" wrote in
message ...
"It" is set it = activesheet (just so I have a short form). Later in my
code
there are these two lines:

it.Cells(i, 13).AddComment "OK"
it.Cells(i, 13).Interior.Color = 13434828

the first one works fine, the second one gives an "application error" and
exits.

I use similar code all over my apps. What is wrong with this example?

Maury