Fase I
Presione La Teclas Alt + F11, para entrar al editor de Visual Basic. Activa las siguientes opciones: De clic en el Menú Ver y elija la opción Explorador de Proyectos De clic en el Menú ver y elija la opción Ventana Propiedades Del Menú Insertar elija la Opción UserForm. Esto inserta el Formulario que programaremos con controles. En el Explorador de Proyecto se observara que se inserto el UserForm.
Ahora crearas un formulario con el siguiente aspecto:
el formulario tendrá:
- Tres etiquetas
- Tres Textbox
- Un Botón de Comando
Los
datos que se preguntaran serán Nombre y Edad, los Días Vividos se
generaran automáticamente cuando insertes la edad. A continuación se
muestra como se deben de programar estos Controles:
Programación de los Controles:
Private Sub CommandButton1_Click()
Selection.EntireRow.Insert
TextBox1 = Empty
TextBox2 = Empty
TextBox3 = Empty
TextBox1.SetFocus
End Sub
Private Sub TextBox1_Change()
Range("A9").Select
ActiveCell.FormulaR1C1 = TextBox1
End Sub
Private Sub TextBox2_Change()
Range("B9").Select
ActiveCell.FormulaR1C1 = TextBox2
Rem aquí se crea la Formula
TextBox3 = Val(TextBox2) * 365
Rem El Textbox3 guardara el total de la multiplicación del Textbox2 por 365
Rem El Comando Val permite convertir un valor de Texto a un Valor Numérico
Rem Esto se debe a que los Textbox no son Numéricos y debemos de Convertirlos
End Sub
Private Sub TextBox3_Change()
Range("C9").Select
ActiveCell.FormulaR1C1 = TextBox3
End Sub
Esto va permitir que cuando se ejecute el formulario y se de la edad el resultado de los días vividos aparecerá en el Textbox3 y se escribirá también en Excel. El comando Val es un comando de Visual Basic
que te permite convertir un valor de texto a un valor numérico.
Recuerden el Comando Rem se utiliza para poner Comentarios únicamente y
no afecta a la programación.
No hay comentarios:
Publicar un comentario