Tengo un user form con texbox necesito que se guarde la informacion en el texbox y que al cerrar el archivo y volverlo
Tengo un user form y dentro de el tengo texbox a los cuales se le ingresan texto lo que necesito es que ese texto que se les agrega se quede guardado en el texbox y que al cerrar y volver a abrir el archivo permacesca la informacion que se ingreso desde un pricipio
1 Respuesta
H o l a:
La información que pones en los textbox está memoria, cuando cierras el userform, la memoria se destruye y entonces no puedes recuperar la información para regresarla a los textbox.
Lo que se hace en esos casos, es pasar la información a una hoja. Por ejemplo:
- Abres tu formulario
- Capturas los datos en los textbox
- Presionas un botón y se pasa la información a la hoja de cálculo "Especial"
Private Sub CommandButton1_Click()
'Por.Dante Amor
Set h = Sheets("Especial")
h.Range("A1") = TextBox1
h.Range("A2") = TextBox2
h.Range("A3") = TextBox3
End SubDespués de cerrar tu userform, guardas tu archivo, cierras tu libro. Cuando vuelvas a abrir tu libro y después abras el formulario, el formulario leerá la información de la hoja:
Private Sub UserForm_Activate()
'Por.Dante Amor
Set h = Sheets("Especial")
TextBox1 = h.Range("A1")
TextBox2 = h.Range("A2")
TextBox3 = h.Range("A3")
End SubPon ambas macro en el código del formulario. Siempre que abras el formulario leerá la información que existe en la hoja "Especial", es como si la información "permaneciera" en los textbox del userform.
Cambia en las macros "Especial" por el nombre de hoja que desees.
[code]':)
'Saludos. Dante Amor Recuerda valorar la respuesta.
