Как переименовать книгу Эксель? - VBA

Формулировка задачи:

1)Как сделать так, чтобы вместо 'Microsoft Excel-Книга1' получилось 'Капец Ёкселю' (или что-то другое) 2)Как сделать так, чтобы книга состояла только из названия ('Капец Ёкселю') и двух листов, при этом не должно быть никаких панелей,строки формул и т.п., листы можно было переключать только с помошщью созджаннох кнопки?

Решение задачи: «Как переименовать книгу Эксель?»

textual
                            Листинг программы 
                        

                            Sub Test()
    Application.Caption = 'Капец Ёкселю'
    ActiveWindow.Caption = ''
End Sub
                        