si = Application
o = si.Selection(0)
o1 = si.Selection(1)
c = o.Properties("Display").Parameters("wirecolorrgb").Value
c1 = o1.Properties("Display").Parameters("wirecolorrgb").Value
print c == c1