This example assigns a priority of 10 to the workbook Book1.xls.
Application.Workbooks("Book1.xls").Activate CB.SetCBWorkbookPriority(10)