Excel VB按钮

在“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

---

@泰格拉瓦塔：他最近因为这个。。。祈祷他没有喝咖啡吧：p

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