VBA UID help for Version 10

I am working in ArcGIS 10.0 with Windows 7 and have some VBA code that I cannot get to work. It will take quite a while transition to VB.NET so any help to get this to work now would be helpful.
I have a toolbar with several command buttons that no longer work in 10.0. The error lies with the ArcID module.

'The following code hides and displays the wanted toolbars
Dim pCommandBars As ICommandBars
Dim pCommandBar As ICommandBar

Set pCommandBars = ThisDocument.CommandBars
pCommandBars.HideAllToolbars

Set pCommandBar = pCommandBars.Find("SDAT.CCAT", False, True)
pCommandBar.Dock esriDockTop

Set pCommandBar = pCommandBars.Find(ArcID.Editor_EditorToolbar)--> Can't find project or libary.

Has something changed in terms of references or a new UID? It looks like all the correct references are checked and it's in the ArcID module.
Something so simple and I cannot get this to work in 10.0.