Scribd Logo
Cargar

¡Te damos la bienvenida a Scribd!

  • 38 vistas

    MACROS EN EXCEL CON FORMULARIOS Ejercici

    Cargado por

    Jorjito Ramirez
    Este documento describe cómo crear macros en Excel que utilizan formularios. Explica cómo agregar controles como etiquetas, cuadros de texto y botones a un formulario y programar su comportamiento utilizando código Visual Basic. Proporciona ejemplos de código para crear formularios que calculan la edad en días y el sueldo neto basado en los días trabajados y bonos. También muestra cómo buscar información introducida en un cuadro de texto.

    Copyright:

    © All Rights Reserved
    Descargue como PDF, TXT o lea en línea desde Scribd

    MACROS EN EXCEL CON FORMULARIOS Ejercici

    Cargado por

    Jorjito Ramirez
    38 vistas4 páginas
    Este documento describe cómo crear macros en Excel que utilizan formularios. Explica cómo agregar controles como etiquetas, cuadros de texto y botones a un formulario y programar su comportamiento utilizando código Visual Basic. Proporciona ejemplos de código para crear formularios que calculan la edad en días y el sueldo neto basado en los días trabajados y bonos. También muestra cómo buscar información introducida en un cuadro de texto.

    Descripción original:

    ejercicio de vba de userform en programacion

    Título original

    MACROS_EN_EXCEL_CON_FORMULARIOS_Ejercici

    Derechos de autor

    © © All Rights Reserved

    Formatos disponibles

    PDF, TXT o lea en línea desde Scribd

    ¿Le pareció útil este documento?

    ¿Este contenido es inapropiado?

    Este documento describe cómo crear macros en Excel que utilizan formularios. Explica cómo agregar controles como etiquetas, cuadros de texto y botones a un formulario y programar su comportamiento utilizando código Visual Basic. Proporciona ejemplos de código para crear formularios que calculan la edad en días y el sueldo neto basado en los días trabajados y bonos. También muestra cómo buscar información introducida en un cuadro de texto.

    Copyright:

    © All Rights Reserved
    Descargue como PDF, TXT o lea en línea desde Scribd
    Descargar como pdf o txt
    38 vistas4 páginas

    MACROS EN EXCEL CON FORMULARIOS Ejercici

    Cargado por

    Jorjito Ramirez
    Este documento describe cómo crear macros en Excel que utilizan formularios. Explica cómo agregar controles como etiquetas, cuadros de texto y botones a un formulario y programar su comportamiento utilizando código Visual Basic. Proporciona ejemplos de código para crear formularios que calculan la edad en días y el sueldo neto basado en los días trabajados y bonos. También muestra cómo buscar información introducida en un cuadro de texto.

    Copyright:

    © All Rights Reserved
    Descargue como PDF, TXT o lea en línea desde Scribd
    Descargar como pdf o txt
    Está en la página 1de 4

    MACROS EN EXCEL CON FORMULARIOS

    Ejercicios

    TRABAJANDO CON FORMULAS

    Es de suma importancia saber aplicar Formulas en Macros de Excel, ya que la


    mayoría de las hojas de cálculos las involucran, por ejemplo los Inventarios, las
    Nóminas o cualquier otro tipo de hoja las llevan, es por eso que en la siguiente
    Fase se muestra cómo manejar Formulas en Macros de Excel.

    Fase I

    1. Presione La Teclas Alt + F11, para entrar al editor de Visual Basic.


    2. Activa las siguientes opciones:

    o De clic en el Menú Ver y elija la opción Explorador de Proyectos

    o De clic en el Menú ver y elija la opción Ventana Propiedades


    2. 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á:

    o Tres etiquetas
    o Tres Textbox
    o 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 dé 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.

    Este Archivo de esta Macro se llama Macros de Edad y viene incluido aquí.

    Generaremos otro ejemplo, Crea el Siguiente Formulario con los siguientes datos:

     5 Etiquetas
     5 Textbox
     1 Botón de Comando
    Los datos que se preguntaran serán Nombre, Días Trabajados, Pago por Día,
    Bonos y Sueldo Neto.

    Genera el siguiente código:

    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
    End Sub

    Private Sub TextBox3_Change()


    Range("C9").Select
    ActiveCell.FormulaR1C1 = TextBox3
    End Sub

    Private Sub TextBox4_Change()


    Range("D9").Select
    ActiveCell.FormulaR1C1 = TextBox4
    Rem aquí se crea la formula
    TextBox5 = Val(TextBox2) *Val(TextBox3) + Val(TextBox4)
    Rem El TextBox5 guardarael total
    End Sub
    Private Sub TextBox5_Change()
    Range("E9").Select
    ActiveCell.FormulaR1C1 = TextBox5
    End Sub

    Cuando se introduzca el Bonos automáticamente se generara el Sueldo Neto.

    Este ejemplo viene en el Archivo Macros de Sueldo Neto

    USANDO INFORMACIÓN CON UN TEXTBOX

    Se puede buscar información con un Textbox programándolo de la siguiente


    forma:

    Dibuje una Etiqueta, un Textbox y un Botón de Comando y agregue el siguiente


    Código:

    Private Sub TextBox1_Change()


    Range("a9").Select
    ActiveCell.FormulaR1C1 = TextBox1
    End Sub

    Private Sub CommandButton1_Click()

    Cells.Find(What:=TextBox1, After:=ActiveCell, LookIn:=xlFormulas, LookAt _


    :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
    False).Activate
    End Sub

    Si te fijas incluí en la programación del Botón Buscar Ahora que buscara lo que
    en el Textbox1 a la hora de Presionarse.

    También podría gustarte