Editar y guardar cambios para la siguinete ejecución

Iniciado por Hurubnar, 15 Febrero 2011, 15:58 PM

0 Miembros y 1 Visitante están viendo este tema.

rodrigova

Yo pase con la misma duda casi toda la noche de ayer, pero ahora se me ocurrio una solución muy fácil. Espero aun te sirva.

¿Que queremos lograr?
Que al ejecutar mi userform al agregar un texto en el textbox1, este texto aparezca en mi Label1 y quede guardado.

¿Se puede hacer? No, pero puedes realizar algo que es como guardarlo en el label engañando a la persona que ejecuta el programa.

¿Como lo hago?
1. Necesitas guardar el texto del textbox1 en una celda.
Por ejemplo:

Private Sub CommandButton1_Click()
ActiveCell = Txt1
End sub

2. Luego necesitas que al abrir el formulario el texto que pegaste en la celda activa
aparezca en tu lbl1, y sencillamente necesitas ponerlo en initialize, dandole el valor de celda activa a tu label
Asi:

Private Sub UserForm_Initialize()
Lbl1.Caption = ActiveCell
End sub

3. Listo viejo, cada vez que abras el formulario, será como haber guardado el texto en el label. :)




arfgh

en el mismo ejecutable del programa sí que puedes hacerlo, simplemente escribe en él al final del mismo con una estructura que te inventes.

saludos