How do you add the warning pull down next to a cell?

[Guest]

I wonder if someone can direct me to the function, collection, documetnation,
etc. on how you add the little drop-down box next to a cell with the warning
icon. Is it as simple as creating a drop down dialog, finding the cell
corrdinates, and dialog.show() to the left of the cell. The toolip appears to
be part of that dialog.

Thanks

 

[Guest]

There are predefined errors conditions in Excel. The code below (from help)
shows how to check these values in code.

Sub ErrorValue()

' Place a number written as text in cell A1.
Range("A1").Formula = "'1"

If Range("A1").Errors.Item(xlNumberAsText).Value = True Then
MsgBox "Cell A1 has a number as text."
Else
MsgBox "Cell A1 is a number."
End If

End Sub

If you want to define errors other than the errors that are included in
Excel, I think that you would have to define a new class. A quick and easy
alternative might be to use your code to check for errors, and use the
AddComment method to add a comment to cells that you beleive contain errors.

 

[Guest]

Hi Jared,

Thanks for the reply. Actually, what I'm trying to avoid are message boxes.
My application has hundreds of cells that are being updated and what I am
looking for is a way to, individually, display an error message with each
cell. Somthing like adding comments to a cell yet more like, in Office 2003,
there is a little warning icon that appears to a cell with a problem. The
icon is not much bigger than the cell. If you mouse over the icon, a toop tip
is dissplayed and there is a pulldown arrow that, if selected, yields a
short-cut menu for additional actions. It seems like a Range object may have
an object that has this functionality build in like "comments". I just don't
know how it's done in native Excel. Does that make sense?

Dave