Hello there ,I am woorking on MS Project vba code.Suddenly I am receiving this error message when I run my code .My code was working before but once I added more project it started giving me error message "Error Found in Custom UI XML
of"ProjectOName" Line 1 Column 107.The quick access toolbar can only be customized in startFromScratch mode"
Once I got this message I changed my code from
NavBar = NavBar + " <mso:ribbon>" to <mso:ribbon startFromScratch="true">" , now this gives me syntax error message.
I have very small knowledge in programming.Could anyone please help me out from here.Thanks
Public Sub Addcustomnavigation()
Dim NavBar As String
NavBar = "<mso:customUI xmlns:mso=""
http://schemas.microsoft.com/office/2009/07/customui
"">"
NavBar = NavBar + " <mso:ribbon startFromScratch="true">"
NavBar = NavBar + " <mso:qat/>"
NavBar = NavBar + " <mso:tabs>"
NavBar = NavBar + " <mso:tab id=""tool"" label=""Utilities"" insertBeforeQ=""mso:TabFormat"">"
NavBar = NavBar + " <mso:group id=""myTools"" label=""MyTools"" autoScale=""true"">"
NavBar = NavBar + " <mso:button id=""placeholder3"" label=""Work "" "
NavBar = NavBar + "imageMso=""DiagramTargetInsertClassic"" onAction=""SumWork""/>"
NavBar = NavBar + " </mso:group>"
NavBar = NavBar + " </mso:tab>"
NavBar = NavBar + " </mso:tabs>"
NavBar = NavBar + " </mso:ribbon>"
NavBar = NavBar + "</mso:customUI>"
ActiveProject.SetCustomUI (NavBar)
End Sub
