Programa ActiveCell.FormulaR1C1 = TextBox2
Enviado por veronica1416 • 31 de Julio de 2012 • Trabajos • 295 Palabras (2 Páginas) • 447 Visitas
Range("B9").Select
ActiveCell.FormulaR1C1 = TextBox2
End Sub
Esto indica que se valla a B9 y escriba lo que hay en el Textbox2
Para volver al Formulario y programar el siguiente Textbox de doble
clic en UserForm1 que se encuentra en el Explorador de Proyecto,
o simplemente de clic en Ver Objeto en el mismo Explorador de
Proyecto.
10. Ahora de doble clic sobre el control Textbox3 para programarlo y
después inserte el siguiente código:
Private Sub TextBox3_Change()
Range("C9").Select
ActiveCell.FormulaR1C1 = TextBox2
End Sub
Esto indica que se valla a C9 y escriba lo que hay en el Textbox3
Para volver al Formulario y programar el Botón de Comando
Insertar de doble clic en UserForm1 que se encuentra en el
Explorador de Proyecto, o simplemente de clic en Ver Objeto en el
mismo Explorador de Proyecto.
11. Ahora de doble clic sobre el control Botón de Comando para
programarlo y después inserte el siguiente código:
Private Sub CommandButton1_Click()
Rem inserta un renglón
Selection.EntireRow.Insert
Rem Empty Limpia Los Textbox
TextBox1 = Empty
TextBox2 = Empty
TextBox3 = Empty
http://www.mailxmail.com/opt/cursoCompletoVisor.cfm?idCurso=12719&b=true
Range("B9").Select
ActiveCell.FormulaR1C1 = TextBox2
End Sub
Esto indica que se valla a B9 y escriba lo que hay en el Textbox2
Para volver al Formulario y programar el siguiente Textbox de doble
clic en UserForm1 que se encuentra en el Explorador de Proyecto,
o simplemente de clic en Ver Objeto en el mismo Explorador de
Proyecto.
10. Ahora de doble clic sobre el control Textbox3 para programarlo y
después inserte el siguiente código:
Private Sub TextBox3_Change()
Range("C9").Select
ActiveCell.FormulaR1C1 = TextBox2
End Sub
Esto indica que se valla a C9 y escriba lo que hay en el Textbox3
Para volver al Formulario y programar el Botón de Comando
Insertar de doble clic en UserForm1 que se encuentra en el
Explorador de Proyecto, o simplemente de clic en Ver Objeto en el
mismo Explorador de Proyecto.
11. Ahora de doble clic sobre el control Botón de Comando para
programarlo y después inserte el siguiente código:
Private Sub CommandButton1_Click()
Rem inserta un renglón
Selection.EntireRow.Insert
Rem Empty Limpia Los Textbox
TextBox1 = Empty
TextBox2 = Empty
TextBox3 = Empty
http://www.mailxmail.com/opt/cursoCompletoVisor.cfm?idCurso=12719&b=true
...