Microsoft Visual Basic es un lenguaje de programación utilizado para extender la funcionalidad de Microsoft Word y Excel. Codificación de proyectos de Visual Basic que realizan tareas esenciales de Excel le enseñarán cómo utilizar Visual Basic para aumentar su productividad Excel. Cree los datos

Este proyecto resume los números en un rango por encima de la celda activa , entrando en la suma en la celda activa. Para iniciar este proyecto , cree los datos para ello - los números que se suman. En una hoja de cálculo de Excel , escriba los cinco números en una columna. Seleccione la primera celda vacía debajo de la columna de números .

Ahora , cree el programa de Visual Basic que sumar esos números.
Introduzca el código en el entorno de desarrollo

Ingrese el entorno de desarrollo integrado de Visual Basic ( IDE ) presionando Alt- F11. En la ventana de código , entrar en esta función :

Sub Macro1 ()

Dim s Como StringDim o Como RangeDim p como gama

Set o = ActiveCell.Offset ( -1 ) Set p = o.End ( xlUp ) Set q = Range ( o, p )

s = " = Media (" & q.Address & ") "

ActiveCell.Formula = s

End Sub

código del programa es equivalente a introducir manualmente el siguiente texto de la celda seleccionada anteriormente: "= suma ( ) ", donde se refiere a la columna de los números que ha introducido.

Ejecute la macro al volver a la hoja de cálculo Excel , la selección de Desarrollador > macros , seleccione Macro1 y presionar el botón Ejecutar. La macro resume la columna de números , que entra en el resultado en la celda actualmente activado . ( Si no ve la ficha Programador , exponerlo al seleccionar el botón de Office en la esquina superior izquierda de Excel , seleccione Opciones de Excel , y " Mostrar ficha Programador en la cinta . " )
< Br > proyecto Dos: Utilice un formulario

el segundo proyecto se basa en la primera , permitiendo al usuario de su programa una selección de funciones

Vuelva a introducir el IDE de Visual Basic y seleccione. Insertar> UserForm . Arrastre los siguientes controles al formulario desde el Cuadro de herramientas : un cuadro de lista y un botón. Presione F7 para volver a la vista de código , y elija UserForm en el cuadro desplegable de la izquierda en la parte superior de la ventana de código, e inicializar desde el cuadro desplegable de la derecha . El IDE crea la función Sub UserForm_Initialize (). En esa función , introduzca el código , que agrega al cuadro de lista los nombres de las funciones que el usuario seleccione entre:

ListBox1.AddItem " suma " ListBox1.AddItem "promedio"

Utilice el cajas izquierda y derecha desplegable de la ventana de código , una vez más , la elección de CommandButton1 desde la izquierda desplegable , y haga clic en el cuadro desplegable de la derecha . El IDE crea la función vacía CommandButton1_Click (). Escriba el siguiente código en esa función , que se llama el original macro1 que escribió con la función que el usuario elige de la lista desplegable :

Macro1 ( ListBox1.Value )

Modificar Macro1 a aceptar una argumento: Haga clic derecho en el texto " Macro1 " y seleccione Definición de navegar a la definición Macro1 . Cambie la línea "Sub Macro1 () " por " Sub Macro1 ( función As String ) "

Ahora que ha agregado el argumento , modificar Macro1 usarlo: cambiar el estado s = " = Media ( " y q.Address y ") " para que lea como sigue:

s =" = "& fun &" ("& q.Address &") "
Escribe el función que carga el formulario

Introduce esta nueva funcionalidad por debajo macro1 :

Sub macro2 () UserForm1.ShowEnd Sub

Volver a Excel (alt -F11 ) y colocar el cursor debajo de la columna de números . Mostrar el formulario de usuario mediante la selección de Desarrollador > Macros y seleccionando Macro2 y Run . Cuando aparezca el formulario, elegir entre la suma o la función normal y pulse el botón. El programa entrará en la fórmula en la hoja de trabajo . La fórmula resume los datos de la columna sobre la celda activa .