viernes, 21 de abril de 2017

ELIMINAR

  If MsgBox("¿Seguro que quiere eliminar este alumno?", vbQuestion + vbYesNo) = vbYes Then
       
        Sheets("DATOS").Select
       
        ActiveCell.EntireRow.Delete
       
       
       
        MsgBox "Alumno eliminado", vbInformation + vbOKOnly
        ComboBox1.SetFocus

1 comentario:

  1. 1. en que zona vive
    2. cuál era su puesto anterior?
    3. cuánto le gustaria ganar?
    4. Vive con su padres?
    5. Tiene vehiculo?
    6.le gusta trabajar en grupo?
    7. Qué animal le gustaria como mascota?
    8. Mencione una debilidad?
    9. Mencione una habilidad suya?

    ResponderEliminar