vba ile komut düğmesi oluşturma

Geçerli çalışma sayfasına bir komut düğmesi eklemek, ardından bu düğmeye tıklandığında çalışacak bir kod eklemek için vba kodu nedir?

şimdiden teşekkürler. Not: komut düğmesine tıklanacak görev şudur: çalışma kitabının adı "123" (zaten açık), çalışma sayfası adını "ABC" seçin, sonra a123 aralığını seçin.

Tipik düğme üreticisi:

Sub button_maker()
    Dim r As Range
    Set r = Selection
        ActiveSheet.Buttons.Add(94.5, 75.75, 51, 27.75).Select
        Selection.OnAction = "macro123"
        ActiveSheet.Shapes(1).Select
        Selection.Characters.Text = "macro123"
    r.Select
End Sub

ve tipik düğme kodu:

Sub macro123()
    Workbooks("123.xlsx").Activate
    Sheets("ABC").Select
    Range("A123").Select
End Sub