This example sets the name that appears in the title bar of the main Microsoft Excel window to be a custom name.
Application.Caption = "Blue Sky Airlines Reservation System"
This example sets the name of the first window in the active workbook to be "Consolidated Balance Sheet." This name is then used as the index to the Windows property.
ActiveWorkbook.Windows(1).Caption = "Consolidated Balance Sheet"
ActiveWorkbook.Windows("Consolidated Balance Sheet") _
.ActiveSheet.Calculate