Hi Geo,

It works for me so I am at a loss. Why don't you mail me the workbook (bob
.. phillips @ tiscali . co . uk - remove the spaces), and I will see what I
can do.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Geo Siggy " wrote in message
...
Hi Bob or anybody

I tested the code in my application, and there is still a run time
error No. 13 ('types incompatible') when reaching the line
For i = LBound(aryCBs) To UBound(aryCBs)
when closing the application.
The disappearing of the commandbars works the reappearance dont.
I tried some changes but I dont find the clue.

Siggy


---
Message posted from http://www.ExcelForum.com/