Identify Smart Tag
I know that if I have a smart tag in cell C2 I can extract the parent name as
follows:
MsgBox (Worksheets("Sheet1").Range("C2").SmartTags.Parent )
How do I test if the cell in question is in fact a SmartTag. Can you use
the set stmt and Set a variable to a SmartTag Object and then test to see if
the SmartTagObject is Nothing?
The following does not work:
Set X = Worksheets("Sheet1").Range("D2").SmartTags
neither does:
Set X = Worksheets("Sheet1").Range("D2").SmartTags.Parent
Thanks
EM
|