Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado
userform 150x150, Utilidad de ThisWorkBook (grabar cambios)

Utilidad de ThisWorkBook (grabar cambios)

| 1 comentario

Devuelve un objeto WorkBook, que representa el libro en que se está ejecutando el código de la macro activa. Este ejemplo se utilizará para cerrar la hoja de trabajo donde se aplica la macro y decidir si se quieren guardar las modificaciones realizadas o no.

1° Entrar al VBA (ALT + F11)
2° Insertar un UserForm
3° Incluir 2 botones de comando con las opciones de "Salir y Guardar" y "Cerrar hoja"

userform, Utilidad de ThisWorkBook (grabar cambios)

4° Se hace doble click en cada boton para definir su codigo:

Private Sub CommandButton1_Click()
ThisWorkbook.Close SaveChanges:=True
End Sub

Private Sub CommandButton2_Click()
ThisWorkbook.Close SaveChanges:=False
End Sub

5° Se inserta un CommandButton (Activex) en la hoja del excel
6° Se hace doble click desde el modo de diseño para insertar el codigo

Private Sub CommandButton1_Click()
UserForm1.Show
End Sub

7° Ahora para utilizarse, si se realiza algun cambio en la hoja y no se desea guardar, se elige "Cerrar hoja" y no se pregunta si se quiere guardar cambio. Si desea guardarse, se elige "Salir y guardar" y el excel te pedirá la ubicación final del archivo. Tambien puede incluirse el destino en la programación misma.

 Elaborado por: Jacques Sovero

Un comentario

  1. tengo un user-form donde ingreso unos datos de usuario: nombre y correo quiero agregar un boton para que al momento de hacer click haga un update y cierre la excel y lo vuelva abrir salga el ultimo usuario que entro…. me pueden ayudar?

Deja un comentario

Los campos requeridos estan marcados con *.