valdecirrk,

Você pode utilizar um código como este:

Sub ExcluirBotãoDaPlanilha()
    'Exclui o botão da planilha se o nome do mesmo começar com a palavra Button"
    Workbooks("Macros Fundamentalista.xls").Sheets("Relato").Select
    For Each bt In Sheets("Relato").Shapes
        If Left(bt.Name, 6) = "Button" Then
            bt.Delete
        End If
    Next
End Sub