Excel VB Button

Question

В «ActiveSheet.Buttons» я получаю размер кнопок, но не текст, который я хочу, он показывает только «Button 1» (независимо от того, какой номер отображается). Может ли кто-нибудь сказать мне, как получить пользовательский текст в кнопке?

Sub AT() 
    Sheets("134B").Select 
    Sheets("New Tab").Visible = True 
    Sheets("New Tab").Select 
    ActiveSheet.Buttons.Add(0.75, 0.75, 36, 28.5).Select 
    ActiveSheet.Buttons.Add(37.5, 0.75, 17.25, 28.5).Select 
    ActiveSheet.Buttons.Add(55.5, 0.75, 17.25, 28.5).Select 
    ActiveSheet.Buttons.Add(73.5, 0.75, 36, 28.5).Select 
    Sheets("New Tab").Copy Before:=Sheets(3) 
    Sheets("New Tab").Select 
    ActiveWindow.SelectedSheets.Visible = False 
    Sheets("New Tab (2)").Select 
    ActiveWindow.ScrollWorkbookTabs Position:=xlFirst 
    Sheets("DB").Select 
    Range("J23").Select 
End Sub 

Answer 1

ActiveSheet.Buttons.Add(0.75, 0.75, 36, 28.5).Caption= "Hi!"