Hi XLD
tried your code but it is not working

one bug found & resolved
as on workbook open event u mention
[VBA]call Sbinfo[/VBA]
which actualy was

[VBA] Call ShowSBInfo[/VBA]


but then also on click it reset the statusbar but not showing the result based
on selection changes