Public Sub Observador_Click() Dim unboton As Button Dim indice As Integer indice = Last.tag For Each unboton In Panel1.Children 'Eliminar el botón del panel 'If unboton.tag = indice Then unboton.Delete ' ¿ Y si quieres hacerlo invisible ?. Si usas la propiedad visible, desparece de la vista del contenedor padre pero no evita que se redistribuyen los "niños" 'Entonces...y si lo hacemos invisible de otra forma...B-D If unboton.Tag = indice Then With unboton .Border = Border.None .Tag = "" .Text = "" End With Endif Next End