Thao tác Form Controls trên sheet Excel với lệnh VBA

Lấy đối tượng controls từ tên
  ShpName="button1"

  Set shp = ActiveSheet.Shapes(ShpName)
    Dim dong As Integer
    dong = shp.TopLeftCell.Row

Lấy tên của control

   Dim ShpName As String
   ShpName = Application.Caller

Xóa tất cả các nút lệnh, checkbox .. trên sheet

  ActiveSheet.Shapes.SelectAll
    Selection.Delete

Duyệt tất cả các đối tượng trên sheet

Dim btn As Shape
For Each btn In ActiveSheet.Shapes
    MsgBox btn.Name
Next