• Author / Uploaded
• joeljara

Citation preview

INFORMATICA II

Compilador: Lic. Rosell Alejandro Valderrama Chumbes

INTRODUCCIÓN Microsoft Excel, es una aplicación práctica orientada a construir libros y hojas que facilitan el trabajo y mejorar la productividad es decir manejar Excel con eficiencia, en la asignatura de Informática II se aprenderá a usar las herramientas, comandos y funciones orientadas a la parte contable. Se iniciará resolviendo casos o aplicaciones contables y administrativas para que se vayan familiarizando con las funcionalidades que brinda Excel. Desarrollo de aplicaciones con macros y programación VBA Visual Basic for Aplication, con procedimientos y creación de funciones para la optimización en funcionalidad y procesos.

ÍNDICE INTRODUCCIÓN SUMILLA UNIDAD I Sesión 1 Sesión 2 Sesión 3 Sesión 4 Sesión 5

APLICACIONES CON EXCEL Cálculo de Depreciación Letras por Cobrar Libro Caja y Bancos Trabajar con Macros Comprobantes de pago – Factura (Parte 1)

UNIDAD II Sesión 6 Sesión 7 Sesión 8 Sesión 9 Sesión 10

VBA PARA EXCEL Visual Basic para Aplicaciones Fundamentos de Programación Aplicativo Factura (Parte 2) Creando Formularios y sus Controles Aplicativo Recibo por Honorarios

SUMILLA

La asignatura de Informática II pertenece al área curricular de formación profesional especializada y de naturaleza práctica. Tiene el propósito de brindar al estudiante las habilidades y destrezas en el manejo de las hojas electrónicas y elaboración de fórmulas electrónicas para automatizar procesos de cálculo aplicado, para que el estudiante se desempeñe con éxito en el campo profesional de la Contabilidad y la Administración y Negocios Internacionales. Comprende los siguientes contenidos: Desarrollo de Aplicaciones contables, macros y sus aplicaciones avanzadas con Visual Basic para Aplicaciones. Todo esto teniendo en cuenta la filosofía de la educación Adventista.

COMO ESTUDIAR LOS MÓDOLUS DIDÁCTICOS O TEXTOS AUTOINSTRUCTIVOS METODO A2D

A2D

Antes de la lectura Durante la lectura Después de la lectura

El método A2D, es un método de f;acil aplicación para la mayoría de los estudiantes, inclusive para los no autodidactas. Si el estudiante aplica este método su trabajo intelectual será más rápido y eficaz. A2D responde a las letras iniciales de los 3 pasos, que se propone para la lectura de una guía de autoaprendizaje, módulo didáctico o cualquier otro texto.

Antes de la lectura

Consiste en la exploración preliminar y se debe:  Echar un vistazo general empezando por el índice, reconociendo unidades y actividades que se van explicando en la guía de autoaprendizaje.  Anota tus dudas que van surgiendo durante el vistazo general, para esclarecerlos durante la lectura o después de la lectura.  Adoptar una actitud Psicológica positiva.

Durante la lectura

Esta es la fase más importante del método, el ritmo de lectura, lo pone cada lector. Debes tener presente los siguientes aspectos.  Mantén la actitud Psicológica positiva.  Participa activamente la lectura: Tomando apuntes, subrayando, resumiendo y esquematizando.  Si no entiendes lo que lees o encuentras una palabra desconocida, consulta con tu profesor, tutor o un diccionario.

Después de la lectura

Esta fase va afianzar tu lectura, mejorando tu comprensión de lectora, para ello debes tener en cuenta lo siguiente:  Repasa los apuntes tomados, durante la lectura.  Organiza el trabajo y planifica el horario de estudio. Trata de que siempre la misma hora.  Realiza los trabajos diariamente. No dejes que se te acumulen las tareas.  Procura ampliar las lecciones con lecturas complementarias.  Al final de cada actividad o sesión has tu cuadro sinóptico o mapa conceptual.  Elabora tu propio resumen.

Enriquece tu vocabulario para entender mejor las próximas lecturas. Por: Dr. Raúl Paredes Morales

UNIDAD Nº I

APLICACIONES CON EXCEL COMPETENCIAS A LOGRAR CONCEPTUAL Al concluir la unidad el estudiante estará en condiciones de reconocer las herramientas, comandos y funciones de Excel orientadas a la contabilidad y finanzas.

PROCEDIMENTAL El estudiante domina una serie de habilidades y destrezas acerca de las estrategias para manejar y resolver aplicaciones en una hoja de cálculo.

ACTITUDINAL El estudiante debe de cambiar de actitud frente al estudio de los conocimientos logrados.

Sesión 1 CÁLCULO DE DEPRECIACION Introducción De acuerdo con Frank Ayres, Jr. Matemáticas Financiera: Teoría y 500 Problemas Resueltos, serie Shaum, página 7, la depreciación se define como la pérdida de valor de un activo físico (edificios, maquinarias, etc.) como consecuencia de su uso. La depreciación es un gasto como cualquier otro gasto de explotación el cual se debe tomar en cuenta antes de determinar las ganancias de una empresa. El problema principal consiste en determinar qué proporción del activo debe tomarse para un período determinado. Con este fin se han propuesto varios métodos: Método de la línea recta, Método de la Suma de los Dígitos Anuales, Método de la Doble Disminución de Saldo, etc. Depreciación. Método de la Línea Recta Este método es el más simple de todos y por lo tanto el que se usa con más frecuencia. Simplemente se toma el costo de adquisición del activo, el cual incluye, además del valor según factura, el flete y otros gastos, así como también el costo de instalación en aquellos casos en que se requiera. A este importe se le resta el valor residual, el cual se estima por anticipado, prorrateando la diferencia entre la vida útil estimada del activo en referencia. Bajo este método, una parte proporcional del costo del activo se asigna por igual a cada ejercicio durante la vida útil prefijada para dicho activo. El cargo periódico se ex-presa mediante la fórmula [1]: [1] Depreciación = (Costo - Valor_Residual) / Vida Ejercicio hipotético: Supongan que Uds. adquieren una máquina para hacer troqueles cuyo costo instalado y listo para usar es tal como sigue:      

Costo según factura Flete marítimo Gastos de aduana Seguro Acarreo en Perú Gastos de instalación Costo total instalada

S/. 94,540.00 S/. 6,547.00 S/. 2,300.00 S/. 1,540.00 S/. 1,347.00 S/. 1,300.00 S/. 107,534.00

Se estima, además, que la máquina tendrá un valor residual de S/. 12,534.00 después de una vida útil estimada en 10 años. ¿ A cuánto ascenderá el monto de la depreciación anual ?. Para conocer el resultado se deben sustituir los datos del problema en la fórmula [1]. Resultado: S/. 9,500.00 anual. Ahora veamos de qué manera se calcula la depreciación con la hoja de Microsoft Excel: Empezaremos diciendo que Microsoft Excel dispone de varias funciones (en la categoría de funciones financieras) para el cálculo de la depreciación. Una de ellas es la conocida con el nombre de la línea recta, representada por la función =SLN( ). Las siglas aluden a la expresión Stright Line. La sintaxis o manera de escribir correctamente dicha función es la siguiente: [2] =SLN(Costo;Valor_Residual;Vida) Observen que esta función utiliza tres argumentos separados mediante puntos y comas (;). Es obligatorio que colocar dichos argumentos en el mismo orden en que se muestran en la fórmula: Costo: Es el costo inicial del activo. Valor_residual: Es el valor al final de la depreciación (algunas veces se denomina valor residual del activo). Vida: Es el número de períodos durante los cuales ocurre la depreciación del activo (también conocido como vida útil del bien). Metodología de cálculo Vamos a ilustrar a continuación la forma de dar solución al ejercicio hipotético plantea-do más arriba, utilizando la función [2] de Microsoft Excel. 1. Transcriban el Titulo y las etiquetas tal como aparecen en el Cuadro No. 1 2. Copien ahora los datos contenidos en los rangos B3:B5 y C3:C5, respectivamente.

3. Hagan clic en la celda A10 y escriban el año: 0 4. Hagan clic sobre la celda E10 para activarla. Escriban el signo igual (=). Hagan clic sobre la celda B3 para seleccionarla y opriman la tecla Enter. Noten que Excel reproduce el contenido en la celda E10. 5. Hagan clic en la celda A11 y escriban el primer año de vida del activo: 1 6. Hagan clic en la celda B11, escriban el signo = y seleccionen la celda E10. Enter. 7. Hagan clic en la celda C11 y escriban la siguiente fórmula con el fin de calcular el cargo anual o depreciación del activo:  Signo igual (=) para indicarle a Excel que se va a escribir una fórmula  Escriban el nombre de la función SLN de Microsoft Excel con la cual se calculará la depreciación anual (por el método de la línea recta).  Abra paréntesis y escriban: o la dirección de la celda B3 la cual contiene el COSTO del activo. Opriman la tecla F4 para convertir la celda B3 en una celda absoluta4: $B$3 Escriban ; o la dirección de la celda B4, la cual contiene el VALOR RESIDUAL del activo, es decir Bs. 2.456.789. Opriman la tecla de función F4. Escriban ; o la dirección de la celda B5 la cual contiene la VIDA ÚTIL del activo, es decir 10 años. Opriman la tecla de función F4.  Cierren el paréntesis y opriman la tecla Enter. Noten que Excel reporta un cargo por depreciación anual de S/. 9,500.00. Puesto que este cargo es una constante anual, el fondo para reserva de depreciación se incrementará en ese monto cada año, mientras que el valor neto en libros decrecerá también anualmente en dicha cantidad. Vean estos movimientos en el cuadro No. 1 8. En la celda D11 escriban la dirección =C11 y opriman la tecla Enter, con el fin de calcular la depreciación acumulada (es decir, el fondo de reserva para la depreciación). 9. Hagan clic en la celda E11 para activarla y escriban la siguiente fórmula: =E10-C11 con el fin de calcular el valor neto en libros para el final del primer año. Opriman Enter. 10. Hagan clic en la celda A12 y escriban el 2do año de vida del activo, es decir: 2 11. Hagan clic en la celda B12. Escriban =E11 y opriman la tecla Enter. La fórmula tiene por finalidad colocar el valor neto en libros en la celda B12. (inicio del año) 12. Hagan clic en la celda C12 y siga las instrucciones del punto 7 para calcular la depreciación del activo para el segundo año. Si lo prefiere copie el contenido de la celda C12 en C13 utilizando para ello el Visor del portapapeles de Windows. 13. Hagan clic en la celda D12 y escriban la siguiente fórmula para acumular la depreciación del primer año con la depreciación del segundo año, es decir: =D11+C12. Opriman la tecla Enter 14. Hagan clic en la celda E12 para activarla y escriban la siguiente fórmula: =E11-C12 con el fin de calcular el valor neto en libros para el final del segundo año. Opriman la tecla Enter.

15. Ahora Hagan clic en la celda A12 y arrastre hasta la celda E12 con el fin de seleccionar el rango que contiene todas las fórmulas correspondiente al segundo año, es decir: A12:E12 16. Coloque el cursor sobre el Controlador de relleno y arrástrelo hacia abajo con el fin de copiar las fórmulas en el rango A13:E20. 17. Guardar el contenido sin antes renombrar la Hoja1 por Linea Recta. Gráfico de la Depreciación 1. Seleccione los rangos: AÑOS, Cargo Anual a Depreciación y Valor Neto en los libros 2. Seleccione ficha Insertar luego grupo gráficos, Dispersión-Dispersión líneas suavizadas y marcadores, en el cuadro de Diseños de grafico – Diseño1. 3. Escriba los títulos del gráfico según la imagen y Finalizar

Depreciación Método de Línea Recta S/.120,000.00

Nuevos Soles

S/.100,000.00 S/.80,000.00 S/.60,000.00

Series1

S/.40,000.00

Series2

S/.20,000.00 S/.0

2

4

6

8

10

12

Vida Útil (Anos)

Series1 Series2

Depreciación Contante Valor Neto en Libros Decreciente

Depreciación. Método Suma de los Dígitos Anuales De acuerdo con James A. Cashin y Joel J. Lerner, los años de la vida útil del activo se numeran 1, 2, 3, 4, etc. y las cantidades de depreciación se basan en una serie de fracciones que tienen como común denominador la suma de los dígitos de los años de vida útil del activo. El dígito mayor se usa como numerador para el primer año, el dígito inmediatamente anterior para el segundo, y así sucesivamente. Microsoft Excel se basó en este concepto para construir la función =SYD con el fin de calcular la depreciación por el método Sum Year Digits = Suma de los Dígitos Anuales. [3] =SYD(Costo;Valor_Residual;Vida;Período)

Observen que esta función utiliza los siguientes cuatro argumentos separados mediante puntos y comas (;). Es obligatorio que Uds. coloquen dichos argumentos en el mismo orden en que se muestran en la fórmula: Costo: Es el costo inicial del activo. Valor_residual: Es el valor remanente al final de la vida del activo (algunas ve-ces se denomina valor residual del activo). Vida: Es el número de períodos durante los cuales se produce la depreciación del activo (también conocido como vida útil del bien). Período: Es el período y se deben utilizar las mismas unidades que en Vida. Metodología de cálculo Vamos a ilustrar a continuación la forma de dar solución al ejercicio hipotético planteado más arriba, utilizando la función [3] de Microsoft Excel 1. Transcriban el Título y la las etiquetas tal como aparecen en el Cuadro No. 2 2. Copien ahora los datos contenidos en los rangos B26:B28 y C26:C28, respectivamente. 3. Hagan clic en la celda A33 y escriban el año: 0 4. Hagan clic sobre la celda E33 para activarla. Escriban el signo igual (=). Hagan clic sobre la celda B26 para seleccionarla y opriman la tecla Enter. Note que Excel reproduce el contenido en la celda E33. 5. Hagan clic en la celda A34 y escriban el primer año de vida del activo: 1 6. Hagan clic en la celda B34, escriban el signo = y seleccionen la celda E33. Opriman la tecla Enter. 7. Hagan clic en la celda C34 y escriban la siguiente fórmula con el fin de calcular el cargo anual o depreciación del activo:   

Signo igual (=) para indicarle a Excel que se va a escribir una fórmula Escriban el nombre de la función SYD con la cual se calculará la depreciación anual (por el método de la suma de los dígitos anuales). Abra paréntesis y escriba:

 La dirección de la celda B26 la cual contiene el COSTO del activo. Oprima la tecla de función F4 para convertir la referencia relativa B26 en una referencia absoluta, es decir: $B$26. Escriba;  La dirección de la celda B27, la cual contiene el VALOR RESIDUAL del activo, es decir Bs. 2.456.789. Opriman la tecla de función F4. Escriba;  La dirección de la celda B28 la cual contiene la VIDA ÚTIL del activo, es decir 10 años. Opriman la tecla de función F4. Escriba;  La dirección de la celda A34, la cual contiene el primer período para el cual se quiere calcular la depreciación, es decir el primer año  Cierre el paréntesis y opriman la tecla Enter. Noten que Excel reporta una depreciación de S/. 17,273 para el primer año

8. En la celda D34 escriban la dirección =C34 y opriman la tecla Enter, con el fin de acumular la depreciación (es decir, el fondo de reserva para la depreciación). 9. Hagan clic en la celda E34 para activarla y escriban la siguiente fórmula: =E33-C34 con el fin de calcular el valor neto en libros para el final del primer año. Enter. 10. Hagan clic en la celda A35 y escriban el 2do año de vida del activo, es decir: 2 11. Hagan clic en la celda B35. Escriban =E34 y opriman la tecla Enter. La fórmula tiene por finalidad colocar el valor neto en libros en la celda B35. (inicio del segundo año) 12. Hagan clic en la celda C35 y siga las instrucciones del punto 7 para calcular la depreciación del activo para el segundo año. Si lo prefieren copien el contenido de la celda C34 en C35 utilizando para ello el Visor del portapapeles de Windows. 13. Hagan clic en la celda D35 y escriban la siguiente fórmula para acumular la depreciación del primer año con la depreciación del segundo año, es decir: =D34+C35. Opriman la tecla Enter 14. Hagan clic en la celda E35 para activarla y escriban la siguiente fórmula: =E34-C35 con el fin de calcular el valor neto en libros para el final del segundo año. Opriman la tecla Enter. 15. Ahora Hagan clic en la celda A35 y arrastren hasta la celda E35 con el fin de seleccionar el rango que contiene todas las fórmulas correspondiente al segundo año, es decir: A35:E35 16. Coloque el cursor sobre el Controlador de relleno y arrástrenlo hacia abajo con el fin de copiar la fórmula en el rango A36:E43. Gráfico de la Depreciación 1. Con la ayuda de la tecla Control (Ctrl) seleccionen los rangos: AÑOS, Cargo Anual a Depreciación y Valor Neto en los libros 2. Seleccione ficha Insertar luego grupo gráficos, Dispersión-Dispersión líneas suavizadas y marcadores, en el cuadro de Diseños de grafico – Diseño1. 3. Escriba los títulos del gráfico según la imagen y Finalizar

Método de la Suma de los Dígitos Anuales S/.120,000.00

Nuevos Soles

S/.100,000.00 S/.80,000.00 S/.60,000.00

Series1

S/.40,000.00

Series2

S/.20,000.00 S/.0.00 0

2

4

6

8

10

12

Vida Útil (Anos

Series1 Series2

Depreciación Contante Valor Neto en Libros Decreciente

Depreciación. Método Doble Saldo Decreciente De acuerdo con James A. Cashin y Joel J. Lerner8, el método del Doble Saldo Decreciente es el que da la mayor cifra de depreciación en los primeros años y no reconoce el valor de desecho. En cambio, el valor del activo que permanece en los libros al ter-minar el período de depreciación se convierte en el valor residual o valor de desecho. Muchas empresas prefieren este método debido a lo rápidamente que se efectúa la depreciación en los primeros años, que es cuando el activo presta su mayor contribución al negocio y cuando se ha hecho el gasto. El procedimiento consiste en aplicar una tasa fija al valor del activo que declina en los libros cada año. A medida que declina el valor en los libros, la depreciación es cada vez menor. Microsoft Excel se basó en esta definición para construir su función =DDB con el fin de calcular la depreciación por el método Doble Saldo Decreciente. [4] =DDB(Costo;Valor_Residual;Vida;Período;Factor) Note que =DDB utiliza 5 argumentos separados por puntos y comas (;). Es obligatorio que dichos argumentos se coloquen en el mismo orden en que se muestran en la fórmula: Costo: Es el costo inicial del activo. Valor_residual: Es el valor residual al final de la vida del activo Vida: Es el número de períodos durante los cuales se produce la depreciación del activo (también conocido como vida útil del bien).

Período: Es el período para el que se desea calcular la depreciación. El período debe usar las mismas unidades que las utilizadas en Vida. Factor: Es la tasa (%) a la cual disminuye el saldo (si se omite este factor, DDB asumirá el valor por defecto, es decir 2). Metodología de cálculo Vamos a ilustrar a continuación la forma de dar solución al ejercicio hipotético planteado más arriba, utilizando la función [4] de Microsoft Excel 1. Transcriba el Titulo y las etiquetas tal como aparecen en el Cuadro No. 3 2. Copien ahora los datos contenidos en los rangos B49:B52 y respectivamente. 3. Hagan clic en la celda A57 y escriban el primer año de vida del activo: 0

C49:C52,

4. Haga clic sobre la celda E57 para activarla. Escriban el signo igual (=). Haga clic sobre la celda B49 para seleccionarla y opriman la tecla Enter. Note que Excel reproduce el contenido en la celda E57. 5. Haga clic en la celda A58 y escriba el primer año de vida del activo: 1 6. Haga clic en la celda B58, escriba el signo = y seleccionen la celda E57. Opriman la tecla Enter. 7. Haga clic en la celda C58 y escriba la siguiente fórmula con el fin de calcular el cargo anual o depreciación del activo:  Signo igual (=) para indicarle a Excel que se va a escribir una fórmula  Escriba el nombre de la función DDB de Microsoft Excel con la cual se calculará la depreciación anual por el método de la Doble Saldo Decreciente  Abra paréntesis y escriban:



 la dirección de la celda B49 la cual contiene el COSTO del activo. Opriman la tecla de función F4 para convertir la celda B49 en una celda absoluta: $B$49. Escriban ;  la dirección de la celda B50, la cual contiene el VALOR RESIDUAL del activo, es decir Bs. 2.456.789. Opriman la tecla F4. Escriban ;  la dirección de la celda B51 la cual contiene la VIDA ÚTIL del activo, es decir 10 años. Opriman la tecla de función F4. Escriban ;  la dirección de la celda A58, la cual contiene el primer período para el cual se quiere calcular la depreciación, es decir el primer año  la dirección de la celda B52 en la cual está almacenada la tasa a la cual disminuirá el activo. Opriman la tecla de función F4. Cierre el paréntesis y opriman la tecla Enter. Note que Excel reporta una depreciación de S/. 21,507.00 para el primer año.

8. En la celda D58 escriban la dirección =C58 y opriman la tecla Enter, con el fin de calcular la depreciación acumulada (es decir, el fondo de reserva para la depreciación). 9. Haga clic en la celda E58 para activarla y escriba la fórmula: =E57-C58 con el fin de calcular el valor neto en libros para el final del primer año. Enter. 10. Haga clic en la celda A59 y escriba el 2do año de vida del activo, es decir: 2 11. Haga clic en la celda B59. Escriban =E58 y opriman la tecla Enter. La fórmula tiene busca colocar el valor neto en libros en la celda B59. (inicio del 2do año) 12. Haga clic en la celda C59 y siga las instrucciones del punto 7 para calcular la depreciación del activo para el segundo año. Si lo prefiere, puede copiar el contenido de la celda C58 en C59. 13. Haga clic en la celda D59 y escriban la siguiente fórmula para acumular la depreciación del primer año con la depreciación del segundo año, es decir: =D58+C59. Opriman la tecla Enter 14. Haga clic en la celda E59 para activarla y escriban la siguiente fórmula: =E58-C59 con el fin de calcular el valor neto en libros para el final del segundo año. Enter. 15. Ahora haga clic en la celda A59 y arrastre hasta la celda E59 con el fin de seleccionar el rango que contiene todas las fórmulas correspondiente al segundo año, es decir: A59:E59 16. Coloque el cursor sobre el Controlador de relleno y arrástrelo hacia abajo con el fin de copiar la fórmula en el rango A60:E67. Gráfico de la Depreciación 1. Con la ayuda de la tecla Control (Ctrl) seleccionen los rangos: AÑOS, Cargo Anual a Depreciación y Valor Neto en los libros 2. Seleccione ficha Insertar luego grupo gráficos, Dispersión-Dispersión líneas suavizadas y marcadores, en el cuadro de Diseños de grafico – Diseño1. 3. Escriba los títulos del gráfico según la imagen y Finalizar

Método de Doble Disminución de Saldo S/.120,000.00

Nuevos Soles

S/.100,000.00 S/.80,000.00 S/.60,000.00

Series1

S/.40,000.00

Series2

S/.20,000.00 S/.0.00 0

2

4

6

8

10

12

Vida Útil (Anos

Series1 Series2

Depreciación Decreciente Valor Neto en Libros Decreciente

4. Haga clic en la opción ARCHIVO y seleccionar el comando GUARDAR

ACTIVIDAD N° 1 APLICATIVO CUADRO DE CÁLCULO DE DEPRECIACIÓN Crearemos la plantilla Cálculo de Depreciación, en una hoja de Excel. Esta plantilla nos permitirá calcular la depreciación de un activo fijo, por cada periodo de su vida útil, aplicando el método de valuación Línea recta.

En este ejemplo solo se ingresan los datos en las celdas pintadas, para este caso, el activo se adquirió el 1/7/2009 y ese misma fecha como inicio de la depreciación, su costo es de S/. 2,400.00, tiene una vida útil de 10 años, 120 meses, con una tasa de depreciación anual de 10%. Ingresando estos datos, la plantilla calcula hasta que año se depreciara el activo, cuantos meses se deprecian por año, la depreciación del periodo (del año), depreciación acumulada del periodo (del año) y su saldo por año, hasta su agotamiento. En el siguiente ejemplo cambiaremos la vida útil a

5 años, 60 meses, la tasa de

depreciación anual a 20% y el nuevo cálculo será el siguiente.

En el siguiente ejemplo cambiaremos la fecha de adquisición a 1/1/2009, misma fecha como inicio de la depreciación, la vida útil a 4 años, 48 meses, la tasa de depreciación anual a 25% y el nuevo cálculo será el siguiente.

Como se ve esta plantilla realiza el cálculo, con solo ingresar los parámetros del activo a depreciar, ahora veremos que formulas tenemos que crear en la plantilla. Celda

Formula

D9

=D8*12

A14

=SI(C14>0,1,0)

A15

=SI(C15>0,2,0)

A16

=SI(C16>0,3,0)

A17

=SI(C17>0,4,0)

A18

=SI(C18>0,5,0)

A19

=SI(C19>0,6,0)

A20

=SI(C20>0,7,0)

A21

=SI(C21>0,8,0)

A22

=SI(C22>0,9,0)

A23

=SI(C23>0,10,0)

A24

=SI(C24>0,11,0)

B14

=SI(D4>0,AÑO(D4),0)

B15 – B24

=SI(Y(C14>0,A15>0),B14+1,0)

C14

=SI(D6>0,13-MES(D6),0)

C15

=SI(Y(G14>0,(D$9-C14)>=12),12,0)

C16

=SI(Y(G15>0,(D$9-(C14+C15))>=12),12,0)

C17

=SI(Y(G16>0,(D$9-(C14+C15+C16))>=12),12,0)

C18

=SI(Y(G17>0,(D$9-(C14+C15+C16+C17))>=12),12,SI(Y(G17>0,(D$9(C14+C15+C16+C17))0,(D$9-(C14+C15+C16+C17+C18))>=12),12,SI(Y(G18>0,(D$9(C14+C15+C16+C17+C18))0,(D$9(C14+C15+C16+C17+C18+C19))>=12),12,SI(Y(G19>0,(D$9(C14+C15+C16+C17+C18+C19))0,(D$9(C14+C15+C16+C17+C18+C19+C20))>=12),12,SI(Y(G20>0,(D$9(C14+C15+C16+C17+C18+C19+C20))0,(D$9(C14+C15+C16+C17+C18+C19+C20+C21))>=12),12,SI(Y(G21>0,(D$9(C14+C15+C16+C17+C18+C19+C20+C21))0,(D$9(C14+C15+C16+C17+C18+C19+C20+C21+C22))>=12),12,SI(Y(G22>0,(D$9(C14+C15+C16+C17+C18+C19+C20+C21+C22))0,(D$9(C14+C15+C16+C17+C18+C19+C20+C21+C22+C23))>=12),12,SI(Y(G23>0,(D $9-(C14+C15+C16+C17+C18+C19+C20+C21+C22+C23))0,B14>0),D$5,0)

E14

=((D14*D$7)/12)*C14

F14

=E14

F15 - F24

=SI(E15>0,F14+E15,0)

G14 – G24

=SI(F14>0,D14-F14,0)

Sesión 2 LETRAS POR COBRAR Toda empresa tiene dificultad para ganarse un sitial en el mercado, dentro de las acciones a tomar esta justamente la venta al crédito, extendiendo para ello una letra de cambio , comprometiéndose el cliente a cumplir con su compromiso de pago en la fecha establecida, estas letras son controladas por el vendedor en un auxiliar llamado REGISTRO DE LETRAS POR COBRAR .

Concepto Es un libro Auxiliar voluntario, en el que se registra en forma cronológica, las letras aceptadas por terceros como consecuencia de una venta o prestación de servicio, teniendo en cuenta la factura o el contrato de compra-venta.

Rayado El rayado del registro de Letras por cobrar ,no es uniforme, se adecua de acuerdo a las necesidades de la empresa, siendo el mas usual el siguiente:         

Se registra la fecha de emisión de la letra. Se especifica el Nº de la factura correspondiente. Se registra el Nº de la letra Se hace referencia al cliente o persona quien acepta la letra. Se refiere a la fecha en que se acepta la letra. Se registra el tiempo en que se debe cancelar las letras. Se refiere a las fechas en que debe ser canceladas las letras. Se especifica el importe de cada letra. Se escribe las posibles observaciones a que hubiese lugar

ACTIVIDAD N° 2 APLICATIVO – LETRAS POR COBRAR Crearemos la plantilla Letras por Cobrar, en una hoja.

Esta plantilla calculara la fecha de vencimiento de las letras, teniendo en cuenta la fecha de aceptación y los días de plazo. En la imagen anterior, la letra N 1 tiene una fecha de aceptación el 15/04/2009, pagadero a 30 días de plazo, la plantilla indica que la fecha de pago será el 15/05/2009. Cambiemos ahora los días de plazo a 60 y veamos qué fecha de vencimiento nos muestra la plantilla.

Como se ve la fecha de vencimiento ha cambiado y nos muestra el 14/06/2009. Crearemos lista para la columna: Endoso a Cargo de Ahora veremos que formulas tenemos Celda

Formula

K7 – K21

=SI(I7>0,SI(MES($H7+$I7)=1,DIA($H7+$I7),""),"")

L7 – L21

=SI(I7>0,SI(MES($H7+$I7)=2,DIA($H7+$I7),""),"")

M7 – M21

=SI(I7>0,SI(MES($H7+$I7)=3,DIA($H7+$I7),""),"")

N7 – N21

=SI(I7>0,SI(MES($H7+$I7)=4,DIA($H7+$I7),""),"")

O7 – O21

=SI(I7>0,SI(MES($H7+$I7)=5,DIA($H7+$I7),""),"")

P7 – P21

=SI(I7>0,SI(MES($H7+$I7)=6,DIA($H7+$I7),""),"")

Q7 – Q21

=SI(I7>0,SI(MES($H7+$I7)=7,DIA($H7+$I7),""),"")

R7 – R21

=SI(I7>0,SI(MES($H7+$I7)=8,DIA($H7+$I7),""),"")

S7 – S21

=SI(I7>0,SI(MES($H7+$I7)=9,DIA($H7+$I7),""),"")

T7 - 721

=SI(I7>0,SI(MES($H7+$I7)=10,DIA($H7+$I7),""),"")

U7 – U21

=SI(I7>0,SI(MES($H7+$I7)=11,DIA($H7+$I7),""),"")

V7 – V21

=SI(J7>0,SI(MES($H7+$I7)=12,DIA($H7+$I7),""),"")

W22

=SUMA(W7:W21)

Sesión 3 LIBRO CAJA Y BANCOS Es un libro principal y obligatorio, donde se registra todas aquellas operaciones comerciales en efectivo, cheques o valores representativos de dinero, ya sea ingresos o egresos. Libro Caja y Bancos Su objetivo es el de registrar todas las operaciones comerciales que indiquen movimiento de dinero en efectivo. La importancia de este libro se debe a que nos permite controlar todos los valores que recibe y entrega la empresa, ya sea dinero en efectivo, cheques o una representación de valor, determinar el saldo disponible.

Caja Italiana o Simple

Caja Americana o Tabular

Caja Bancos

SISTEMAS DE LIBRO CAJA Conocido cmo caja centralizado, es la forma más simple de registrar ingresos y egresos de fondos (Diario resumido) Llamado también Analítica, este tipo de sistemas nos permite controlar los fondos de la empresa a través de un diseño especial adoptando la forma columnada. Su función es la de registrar entradas y salidas de fondos en efectivo o cheque.

ACTIVIDAD N° 3 APLICATIVO CAJA Y BANCOS Crearemos la plantilla Caja y Bancos, en la hoja1 Empresa, en la hoja2 Caja, en la hoja3 Banco, en la hoja4 Conc banc (Conciliación bancaria), en la hoja5 Asto Caja (Asiento caja), en la hoja6 Asto Bcos (Asiento Bancos), en la hoja7 PC (Plan de cuentas), en la hoja 8 Operaciones y en la hoja9 T1 (Tipo de medio de pago). Esta plantilla nos permitirá registrar las operaciones de caja, bancos, hacer la conciliación bancaria y nos arrojara los asientos contables.

Ahora veremos que formulas tenemos que crear en la plantilla. Nos ubicamos en la hoja Empresa

Nos ubicamos en la hoja Caja

En la columna Descripción de la operación, crear una lista con los datos de la hoja Operaciones Seleccionar las celdas D9 al D20 y nombrar la selección “CRICAJA” Seleccionar las celdas F9 al F20 y nombrar la selección “DCAJA” Seleccionar las celdas G9 al G20 y nombrar la selección “HCAJA” En esta hoja se crearan las siguientes formulas Celda

Formula

A3

=CONCATENAR("PERIODO: ",MES," - ",AÑO)

A4

=CONCATENAR("RUC: ",RUC)

A5

=SI(CIA>"",CIA,"")

E9 – E20

=SI(D9="","",BUSCARV(D9,PLANC,2,0))

F21

=SUMA(F9:F20)

G21

=SUMA(G9:G20)

F22

=SI(G21>F21,G21-F21,0)

G22

=SI(F21>G21,F21-G21,0)

F23

=SUMA(F21:F22)

G23

=SUMA(G21:G22)

Nos ubicamos en la hoja Banco

En la columna Descripción de la operación, crear una lista con los datos de la hoja T1 Seleccionar las celdas H11 al H21 y nombrar la selección “CRICON” Seleccionar las celdas I11 al I21 y nombrar la selección “CRIBCO” Seleccionar las celdas K11 al K21 y nombrar la selección “DBCO” Seleccionar las celdas L11 al L21 y nombrar la selección “HBCO” En esta hoja se crearan las siguientes formulas Celda

Formula

A3

=CONCATENAR("PERIODO: ",MES," - ",AÑO)

A4

=CONCATENAR("RUC: ",RUC)

A5

=SI(CIA>"",CIA,"")

C11

– =SI(D11>"",BUSCARV(D11,MEDIOPAGOS,2,0),"")

C21 J11 – J21

=SI(I11="","",BUSCARV(I11,PLANC,2,0))

K22

=SUMA(K11:K21)

L22

=SUMA(L11:L21)

K23

=SI(L22>K22,L22-K22,0)

L23

=SI(K22>L22,K22-L22,0)

K24

=SUMA(K22:K23)

L24

=SUMA(L22:L23)

Nos ubicamos en la hoja Conc Banc

En esta hoja se crearan las siguientes formulas Celda

Fórmula

A1

=CONCATENAR("RUC: ",RUC)

A2

=SI(CIA>"",CIA,"")

B4

=CONCATENAR("CONCILIACION BANCARIA MES DE ",MES," DEL ",AÑO)

D8

=SUMAR.SI(CRICON,A8,DBCO)*-1

D9

=SUMAR.SI(CRICON,A9,HBCO)

D12

=SUMA(D7:D11)

D16

=D8*-1

D17

=D9*-1

D18

=D11*-1

D19

=D10*-1

D20

=SUMA(D15:D19)

Nos ubicamos en la hoja Asto Caja

En esta hoja se crearan las siguientes formulas

Celda

Fórmula

A1

=CONCATENAR("PERIODO: ",MES," - ",AÑO)

A2

=SI(CIA>"",CIA,"")

D6

=SUMA(E7:E14)

E7 – E14

=SUMAR.SI(CRICAJA,A7,DCAJA)

D16

=SUMA(D6:D15)

E16

=SUMA(E6:E15)

D17

=SI(D16E16,"NO CUADRA","")

J6 – J19

=SUMAR.SI(CRICAJA,G6,HCAJA)

K20

=SUMA(J6:J19)

J22

=SUMA(J6:J21)

K22

=SUMA(K6:K21)

J23

=SI(J22K22,"NO CUADRA","")

Nos ubicamos en la hoja Asto Bcos

En esta hoja se crearan las siguientes formulas Celda

Fórmula

A1

=CONCATENAR("PERIODO: ",MES," - ",AÑO)

A2

=SI(CIA>"",CIA,"")

D6

=SUMA(E7:E14)

E7 – E14

=SUMAR.SI(CRIBCO,A7,DBCO)

D16

=SUMA(D6:D15)

E16

=SUMA(E6:E15)

D17

=SI(D16E16,"NO CUADRA","")

J6 – J19

=SUMAR.SI(CRIBCO,G6,HBCO)

K20

=SUMA(J6:J19)

J22

=SUMA(J6:J21)

K22

=SUMA(K6:K21)

J23

=SI(J22K22,"NO CUADRA","")

Ahora ingresemos la siguiente información en las hojas Caja

Banco

Estado de cuenta banco (Referencial no se crea esta hoja, solo sirve para hacer la conciliación)

La plantilla calculara automáticamente las siguientes hojas Conciliación bancaria

Los siguientes rubros se ingresan manualmente: ( - ) Nota de Cargo no consider. En Libro Banco ( + ) Nota de Abono no consider. En Libro Banco, según conciliación con el estado de cuenta bancario.

Asiento de caja

Asiento de banco

Sesión 4 TRABAJAR CON MACROS ¿Qué es una macro? Seguro que ha oído hablar de las macros. Alguien le habrá dicho que es una herramienta muy útil para solucionar problemas de cálculo en Excel. En realidad son una serie de instrucciones que se almacenan juntas para usarlas cuando sea necesario. Aunque ya dispone de herramientas que facilitan su trabajo, hay veces que tendrá que repetir sistemáticamente los mismos pasos. Se habrá preguntado: ¿no existe una forma más sencilla de realizar esta tarea? ¡Pues sí! Puede preparar una macro y llamarla para que ejecute todos los pasos automáticamente. Hay dos formas de crear una macro: grabarla o escribirla en el editor de Visual Basic que tiene a su disposición en Excel. Ejemplos: Realizaremos dos prácticas a modo de ejemplo: 1. Insertar automáticamente mi nombre en la celda actual. 2. Introducir la fecha de hoy en la celda actual. Grabar una macro

Cuando graba una macro, MS Excel guarda la información sobre cada paso que da. Si comete algún error mientras se graba la macro, también se graban las correcciones que realice. Antes de empezar a grabar una macro, es conveniente que practique las operaciones que vaya a realizar, las veces que sean necesarias, hasta estar satisfecho.

Recuerde que si comete algún error durante la grabación, no debe preocuparse, porque puede borrar la macro e intentarlo de nuevo. MS Excel almacena cada macro en un espacio llamado módulo que queda adjunto al libro con el que está trabajando. Práctica 1. Grabar una macro Grabar una macro que inserte su nombre. 1. Abra Excel y guarde el libro actual como Ejercicios de Macros (Por tener el ejercicio controlado en todo momento). 2. Ubíquese en la celda donde quiere insertar su nombre. 3. Seleccione Vista en la Cinta de Opciones → Macros → Grabar Macro… Verá la ventana Grabar Macro: Debe darle el nombre a la macro y, si quiere, una tecla rápida (puede ser útil después para llamar a la macro). También puede elegir donde guardar la macro. Hay tres posibilidades: 

En un libro de macros personal, para utilizar la macro siempre que entres en Excel en la misma PC.  En un libro nuevo, para guardar la macro en un nuevo libro.  En este mismo libro, es decir, el que estás utilizando ahora. 4. En la caja que se abre para indicar el nombre de la macro, escriba “InsertarNombre”, y en la caja para indicar la descripción, escriba “Esta macro inserta mi nombre”. 5. Agregue una letra en el “Método Abreviado”. Pulse el botón aceptar. El diálogo Grabar Macro desaparece y vuelve a la hoja activa. A partir de este momento todo lo que haga se grabará en la macro. 6. Escriba el nombre en la Celda actual y pulse la tecla Enter. 7. Pulse el botón detener grabación en la Cinta de Opciones, Macros… Detener Grabación.

8. Presione las teclas Ctrl + j . Observe.

Práctica 2. Grabar una macro Grabar una macro que inserte la fecha de hoy. En realidad, para realizar esta operación bastaría con introducir la función Hoy() en la casilla que desee. El problema que va a encontrar, es que esta función inserta la fecha actual (de hoy) y cada vez (cada día) que abra el libro cambiará. Para solucionar este problema puede utilizar la función de Pegado Especial. Si esta operación la tiene que realizar habitualmente, puede grabar una macro que le ahorre bastante tiempo y equivocaciones: 1. Abrir Excel. 2. Seleccione Vista → Macros → Grabar nueva Macro. 3. En la caja para el nombre de la macro, escriba “InsertarFecha”, y en la caja para la descripción escriba “Esta macro inserta la fecha de hoy”. 4. Pulsar Enter. 5. Escriba =HOY() en celda actual y pulse Enter.

Con el cursor en la celda D2, pulse el botón Copiar de la barra de herramientas estándar. 7. Sobre la celda D2 pulse Inicio → Pegado especial en la Cinta de Opciones. 8. Selecciona la opción Valores en la sección Pegar y pulsa Aceptar. 9. Excel copia el valor de la formula =HOY() en la celda D2. 10. Pulsa el botón de Centrado y el de Negrita. 11. Pulsa el botón detener grabación. 6.

Ejecutar una Macro Una vez almacenada la macro, hay que ejecutarla para que se realicen las acciones que has grabado: 1. Seleccione Vista → Macros → Clic.

2. Seleccione la macro que va a ejecutar. 3. Pulsar el botón Ejecutar. Hay distintas opciones para ejecutar una macro. Debes elegir la opción más adecuada a lo que quiere hacer. Estas son algunas de las posibilidades: 1. 2. 3. 4.

Asignar una tecla rápida. Asociar un botón de la barra de herramientas. Asociar un botón incrustado en la hoja. Asociar un elemento gráfico de la hoja.

Práctica 3: Asociar una tecla rápida a una macro

Asociar una tecla rápida a la macro Insertar Fecha 1. Cinta de Opciones, Vista 2. → Macro → Ver Macros, Clic Opciones…

3. Verá un cuadro de diálogo que se llama Opciones de la Macro. 4. En el cuadro de texto Tecla de método abreviado debe introducir la tecla que escoja. 5. Pulsar el botón Aceptar. Añadir un botón personalizado a la Barra de Herramientas de Acceso Rápido Una opción muy útil es añadir un botón que ejecute una macro ya grabada, para que la tengas disponible siempre que la necesites. Excel permite personalizar las barras de Herramientas de Acceso Rápido, que es lo que vas a usar para solucionar este ejercicio. Práctica 4. Añadir una macro a la barra de herramientas Añadir un botón que ejecute la macro InsertarFecha. 1. Clic botón derecho del mouse → Barras de Herramientas → Personalizar… en la barra de menús.

ACTIVIDAD N° 4 1. Insertar un rectángulo o foto en la hoja que ejecute una macro.

Sesión 5 COMPROBANTES DE PAGO - FACTURA Comprobantes de pago Es todo documento que acredita la transferencia de bienes, entrega en uso o prestación de servicios, calificado como tal por la SUNAT (Según Decreto Ley 25632 y su reglamento). El comprobante de pago es un documento formal que avala una relación comercial o de transferencia en cuanto a bienes y servicios se refiere Documentos considerados como comprobante de pago: a) Factura b) Recibos por honorarios c) Boletas de Venta d) Liquidaciones de Compra e) Ticket o Cintas emitidos por Máquinas Registradoras f) Guía de Remisión FACTURA Es un documento que permite sustentar gastos – costos y detalle en forma clara de bienes y el importe de los mismos, los servicios prestados, descuentos, condiciones de venta, etc. Con este documento el vendedor se verá en la obligación de cobrar el importe fijado y el comprador de pagar el importe exigido o registrado, así como demostrar la propiedad del bien o servicio comprado. Este documento se emitirá a favor de adquiriente o usuario que posea número de Registro Único del Contribuyente (RUC).

ACTIVIDAD N° 5 APLICATIVO FACTURA PARTE 1

Ahora veremos que formulas tenemos que crear en la plantilla. Nos ubicamos en la hoja Clientes

Seleccionar las celdas A4 al A15 y nombrar la selección “CLIENTES” Seleccionar las celdas A4 al C15 y nombrar la selección “CLIENTES1” Nos ubicamos en la hoja Productos

Seleccionar las celdas A4 al A15 y nombrar la selección “PRODUCTOS” Seleccionar las celdas A4 al C15 y nombrar la selección “PRODUCTOS1” Nos ubicamos en la hoja Vendedor

Seleccionar las celdas A4 al A15 y nombrar la selección “VENDEDORES”

Nos ubicamos en la hoja Factura

Celda

Formula

D4

=CONCATENAR(TEXTO(1,"00#")&" - "&TEXTO(J4,"0000#"))

K4

=J4

F6

=HOY()

C7

=SI(A7>0,BUSCARV(A7,CLIENTES1,2,0),"")

B8

=SI(A7>0,BUSCARV(A7,CLIENTES1,3,0),"")

C11

– =SI($A11>0,BUSCARV($A11,PRODUCTOS1,2,0),0)

C18 F11 – F18

=(C11*D11)-E11

B20

=SI(F22>0,Num_Texto(F22),"")

F20

=SUMA(F11:F18)

F21

=F20*0.19

F22

=SUMA(F20:F21)

En la celda A7 – B7, crear una lista con los datos de la hoja Clientes (Campo Nombre o Razón Social) En la celda E8 – F8, crear una lista con los datos de la hoja Vendedor En la celda A11 – B11, crear una lista con los datos de la hoja Productos (Campo Descripción) y copiar esta lista hasta la celda A18

Vuelve a leer la Unidad I, si no puedes responder las actividades. Tú eres el resultado de tus pensamientos IMPORTANTE Si no has contestado las actividades no leas la Unidad II No te engañes a ti mismo

RECUERDA SI TIENES ALGUNA DUDA DE LA UNIDAD ANTERIOR VUELVE A REPASAR PARA QUE ENTIENDAS MEJOR LA SIGUIENTE UNIDAD. Y si aplicas el método de estudios A2D del Doctor Raúl Paredes Morales para lectura de un módulo didáctico o cualquier otro texto tu trabajo intelectual será más rápido y eficaz. RECUERDA SIEMPRE LOS SIGUIENTES ASPECTOS:

 Mantén la actitud Psicológica positiva.  Participa activamente la lectura: Tomando apuntes, subrayando, resumiendo y esquematizando.  Si no entiendes lo que lees o encuentras una palabra desconocida para ti, consulta con tu profesor, tutor o un diccionario.

TU PUEDES      

Repasa los apuntes tomados, durante la lectura. Organiza el trabajo y planifica el horario de estudio. Trata de que siempre la misma hora. Realiza los trabajos diariamente. No dejes que se te acumulen las tareas. Procura ampliar las lecciones con lecturas complementarias. Al final de cada actividad o sesión has tu cuadro sinóptico o mapa conceptual. Elabora tu propio resumen. Enriquece tu vocabulario para entender mejor las próximas lecturas. TU PUEDES SER EL MEJOR ESTUDIANTE Saber cómo estudiar es el secreto Prográmate para ser el mejor y cambiará tu vida

UNIDAD Nº II

VBA PARA EXCEL

COMPETENCIAS A LOGRAR CONCEPTUAL Al concluir la unidad el estudiante estará en condiciones de reconocer, aplicar la programación VBA para la optimización en funcionalidad y procesos en Excel.

PROCEDIMENTAL El estudiante domina una serie de habilidades y destrezas acerca del uso de procedimientos y creación de funciones para resolver aplicaciones en Excel

ACTITUDINAL El estudiante estará en condiciones de desarrollar aplicaciones en su especialidad.

Sesión 6 VISUAL BASIC PARA APLICACIONES VBA significa Visual Basic for Applications. Es un lenguaje de programación que surge de Visual Basic (VB). Se podría decir que es un dialecto de VB. VBA de Excel está adaptado a Excel, para trabajar con celdas, hojas, autofiltro etc. (es decir, los objetos de la aplicación Excel). ¿Qué puedo hacer con VBA? Con este lenguaje de programación puedes crear tus propios programas en Excel. Estos programas pueden ser todo desde una macro (una pequeña programa VBA, por ejemplo un atajo personalizado) hasta una aplicación entera con listas desplegables, menús etc. ¿Puedo acceder a VBA? Sí. VBA está incluido en el Excel ‘normal y corriente’. Se instala con Excel por defecto. ¿Por qué VBA? VBA sirve para muchas cosas. Imagínate todas las tareas repetitivas que tienes que ejecutar todos los días. Un ejemplo - siempre vas aplicando el mismo formato a un grupo de celdas de un libro que te mandan todos los días. En vez de hacer un montón de clic para obtener este formato, puedes automatizar el proceso, a un botón, o un atajo de teclado. También puedes crear aplicaciones que importan datos desde el libro mayor, reorganizan los datos, y crean informes personalizados para cada departamento. Casi no hay límites. VBA de Excel te permite interactuar no solo con otros libros Excel, sino con todos los programas Office, como Access, Word etc. (menos InfoPath que forma parte del Office 2003). Origen de VBA Es de Microsoft, y surge de BASIC (Beginner´s All-purpose Symbolic Instruction Code, o Código de Instrucciones Simbólicas de Uso General para Principiantes), el cual en su turno es un lenguaje que tiene muchos años ya (desde los años sesenta). ¿Existen varios VBAs?

VBA existe para todas las aplicaciones de Microsoft Office, y estas se llaman ‘host aplicacions’. Así que hay VBA para Excel, otro para Word etc. Cada VBA se parece al resto, pero también tienen diferencias, por servir distintos. Editor de Visual Basic El objetivo es mostrar los elementos de la ventana programación de Visual Basic. Haremos una descripción de la ventana del explorador, del examinador de código entre otras. Lo primero es tener activado la ficha Programador y si no lo esta seguir los siguientes pasos: 1. Haga clic en la opción y, a

continuación, haga clic en Opciones.

2. Luego en la ventana Opciones dar clic en Personalizar cinta de opciones, en la sección Fichas principales hacer un clic sobra Programador y luego clic en el botón Aceptar.

3. Ahora debe verse así:

4. Luego hacer clic en el icono Visual Basic o ALT + F11 para ingresar al Editor de Visual Basic para Aplicaciones. 1 2 3

4

1. 2. 3. 4.

Menú principal Barra de Herramientas Explorador de Proyectos Ventana de Propiedades

1. Menú principal: permite acceder a las opciones Archivo, Edición, Ver, Insertar, etc. 2. Barra de Herramientas: Posee una serie de botones que permiten acceder a tareas generales de edición, como copiar, cortar y pegar, opciones del proyecto: Insertar procedimientos, módulos y formularios: y acciones con el código desarrollado, ejecutar un procedimiento, etc. 5

2

1

1. 2. 3. 4.

3

Volver a Microsoft Excel Inserta un Formulario Guardar el Proyecto Ejecutar Sub/User Form (F5)

4

6

7

8

9

10

11

5. Interrumpir 6. Restablecer 7. Modo de diseño 8. Explorador de Proyectos (CTRL + R) 9. Ventana de Propiedades (F4) 10. Examinador de Objetos (F2) 11. Cuadro de Herramientas 3. Explorador de Proyectos En el Explorador de Proyectos podrá ver, modificar, y navegar los proyectos por cada libro de trabajo abierto o referenciado, documento, plantilla o presentación.

Objetos Excel

Formularios

Módulos

Dentro de un Proyecto, puede haber objetos de aplicación que tiene eventos asociados con ellos, las cajas de diálogos(llamadas formularios), módulos, estándares de clases y referencias. Elementos de un Proyecto

Alternar Carpeta

Ver Código

Ver Objeto

Ver Código Muestra la ventana Código para que pueda escribir y editar código asociado al elemento seleccionado. Por ejemplo:

1. Seleccionar el Objeto Formularios UserForm1 2. Hacer clic en el Botón Ver Código

Objeto

Eventos y Procedimientos

Ver Objeto Muestra la ventana Objeto correspondiente al elemento seleccionado, u documento o un formulario existente: Por ejemplo: 1. Seleccionar el Objeto Formularios UserForm1 2. Hacer clic en el Botón Ver Objeto

Objeto formulario para la programación de Interface

Alternar Carpetas Oculta y muestra las carpetas de objetos a la vez muestra los elementos indivisuales contenidos en dichas carpetas. 4. Ventana de Propiedades Una propiedad es una característica de un objeto tal como el color o el título del objeto. Se configura la propiedad para especificar la característica o comportamiento de un objeto. Por ejemplo puede configurar la propiedad Showspelling Error del documento Word o True para mostrar los errores ortográficos en el documento. Podemos acceder a la ventana de propiedades de la siguiente manera:   

Mediante la barra de herramientas estándar Mediante el Menú Ver Presionando la tecla F2

Ventana de Propiedades del Objeto Formulario En este ejemplo se ha cambiado la propiedad Caption del Formulario por Lista de Clientes (Título de Ventana Formulario ). Puede utilizar la ventana de propiedades para configurar las propiedades de un objeto en un tiempo de diseño. La ventana propiedades es muy útil cuando esta trabajando con cajas de diálogos personalizadas y controles ActiveX. Cada control presenta una lista de propiedades, algunas son comunes, como por ejemplo Caption, enabled, sin embargo hay otras propiedades de uso exclusivo.

Ventana de Propiedades de un Cuadro de Textos Escribir un nuevo Procedimiento Un procedimiento es una unidad de código encerrado en Sub y End Sub o entre las sentencias Function y End Function. Para crear un módulo estándar Ir al Menú Inserta luego elegir la opción Módulo.

Ventana de Módulo Para agregar un procedimiento 1. Abra el Módulo (Hacer doble clic sobre el módulo) 2. Haga clic a Procedimiento en el Menú Insertar 3. Seleccione las opciones que dese en la caja de diálogo como el nombre, el tipo y el ámbito. Agregar Procedimiento y luego haga clic en el botón Aceptar.

Por ejemplo En la caja de diálogo, escriba prueba en la caja Nombre, haga clic en Procedimiento debajo de Tipo, haga a Público debajo de ámbito, y luego haga clic en el botón de Aceptar. Se mostrará:

Ventana Módulo con el Procedimiento Prueba Observe que el sistema le añade las expresiones Public Sub y al final End Sub, esto debido a que todo bloque de instrucciones de código se encuentra dentro de estas líneas que indican Inicio y Final del procedimiento. Public Sub Prueba() ………. End Sub

Luego que usted a agregado un procedimiento a un módulo, puede agregar un código a un procedimiento. El siguiente ejemplo agrega al código anterior una que muestre un cuadro de mensaje. Public Sub Prueba() MsgBox(“Bienvenidos a la Programación VBA”) End Sub Si desea escribir códigos que se ejecuten automáticamente cuando cierto evento ocurre, por ejemplo cuando un documento es abierto, una hoja de cálculo es calculada, o un botón en la caja de diálogo Personalizar es seleccionado, debe de escribir un procedimiento asociado con el evento para el objeto o el formulario. Para agregar una función 4. Abra el Módulo (Hacer doble clic sobre el módulo) 5. Haga clic a Procedimiento en el Menú Insertar 6. Seleccione las opciones que dese en la caja de diálogo como el nombre, el tipo y el ámbito. Agregar Función y luego haga clic en el botón Aceptar.

ACTIVIDAD N° 6 Ingresando un Procedimiento 1. Desde el Editor de Visual Basic 2. Ir al Menú Insertar Módulo 3. Se añadirá la carpeta Módulo, dentro del cual se mostrará el objeto Módulo1.

4. Ahora ingresaremos el procedimiento en el área de código. 5. Ir al Menú Insertar luego la opción Procedimiento 6. En nombre Saludo y en tipo Procedimiento.

7. Luego presionar F5 para ejecutar

Sesión 7 FUNDAMENTOS DE PROGRAMACION El lenguaje Visual Basic para Aplicaciones (VBA), en el contexto de Excel, constituye una herramienta de programación que nos permite usar código Visual Basic adaptado para interactuar con las múltiples facetas de Excel y personalizar las aplicaciones que hagamos en esta hoja electrónica. Las unidades de código VBA se llaman macros. Las macros pueden ser procedimientos de dos tipos: - Funciones (Function) - Subrutinas (Sub) ). Las funciones pueden aceptar argumentos, como constantes, variables o expresiones. Están restringidas a entregar un valor en una celda de la hoja. Las funciones pueden llamar a otras funciones y hasta subrutinas (en el caso de que no afecten la entrega de un valor en una sola celda) Una subrutina realiza acciones específicas pero no devuelven ningún valor. Puede aceptar argumentos, como constantes, variables o expresiones y puede llamar funciones. Con las subrutinas podemos entregar valores en distintas celdas de la hoja. Es ideal para leer parámetros en algunas celdas y escribir en otras para completar un cuadro de información a partir de los datos leídos. Editar y ejecutar macros. Las funciones y las subrutinas se pueden implementar en el editor de Visual Basic (AltF11). Para usar una función en una hoja de Excel se debe, en el editor de VB, insertar un módulo y editar la función en este módulo. Esta acción de describe más adelante. De la misma manera se pueden editar subrutinas en un módulo. Una función se invoca en una hoja, como se invoca una función de Excel o una fórmula. Una subrutina se puede invocar por ejemplo desde la ventana de ejecución de macros (Alt-F8) o desde un botón que hace una llamada a la subrutina (como respuesta al evento de hacer clic sobre él, por ejemplo).

El código que ejecuta un botón puede llamar a subrutinas y a las funciones de la hoja. El código del botón no está en un módulo. En la hoja de edición donde se encuentra el código del botón, se pueden implementar funciones para uso de este código pero que serán desconocidas para la hoja (mensaje de error #¿NOMBRE?). Nota: Un error frecuente es editar una función en un módulo que corresponde a una hoja y llamarlo desde otra hoja. En este caso se despliega el error (mensaje de error #¿NOMBRE?). Funciones Una función tiene la siguiente sintaxis: Function NombreFun(arg1, arg2,...,argn) Declaración de Variables y constantes Instruccción 1 Instruccción 2 ... Instruccción k NombreFun = Valor de retorno 'comentario End Function Una función puede tener o no tener argumentos, pero es conveniente que retorne un valor. Observe que se debe usar el nombre de la función para especificar la salida: NombreFun = Valor de retorno Nota 1: Al interior de las funciones, se pueden hacer comentarios utilizando (antes de éstos) la comilla ('). Nota 2: Para el uso de nombres de variables o de cualquier otra palabra reservada de VBA, no se discrimina entre el uso de letras mayúsculas y minúsculas. Ejemplo 1: implementar una función. Vamos a implementar como una macro la función con la que se trabajó previamente: ( )

( )

( )

( )

Para su definición y utilización, se siguen los pasos: 1. Ingresamos a la ficha Programador, luego se elige Editor de Visual Basic:

Primeros pasos para la definición de una macro. También puede usar Alt - F11 2. Nuevamente, en el menú de la ventana que se abre, se elige Insertar, para luego seleccionar Módulo:

Se inserta un módulo en el que se escribirá el código de las macros. 3. Ahora en la pantalla de edición del módulo, escribimos el siguiente código:

Function f(x) f = 2 * x ^ 3 + Log(x) - Cos(x) / Exp(x) + Sin(x) End Function

Escritura del código de una macro. Una vez que ha sido editado el código del macro, se guarda y salimos del ambiente de programación en Visual Basic para volver a la hoja electrónica de donde partimos. Esto se hace en el menú Archivo, seleccionando Cerrar y Volver a Excel. 4. Para evaluar la función ( ) en algunos valores que se localicen, por ejemplo, desde la fila 3 hasta la fila 6 de la columna B, nos situamos en una celda en la que nos interese dejar el resultado de dicha evaluación y se digita +f(B3). Luego se arrastra hasta C6 para copiar la fórmula, quedando:

Evaluación de una función definida por el usuario. Nota: Para conocer con detalle la sintaxis de las funciones matemáticas estándar que se pueden evaluar en Visual Basic, puede usarse la Ayuda del Editor de Visual Basic. Esta sintaxis es un poco diferente a la que maneja Excel para las mismas funciones. Como ya vimos, para implementar la función ( )

( )

( )

( )

En Excel la sintaxis es: 2*B3^3+LN(B3)-COS(B3)/EXP(B3)+SENO(B3) En VBA la sintaxis es 2 * x ^ 3 + Log(x) - Cos(x) / Exp(x) + Sin(x)

Observe, por ejemplo, que la función logaritmo natural mientras que en VBA se escribe Log.

( ), en Excel se escribe LN

Ejemplo 2: Lectura de parámetros en celdas Una vez más vamos a trabajar con el modelo de crecimiento poblacional descrito anteriormente. La función ( ) con

Ahora evaluaremos P(t) para distintos valores del tiempo t en días, pero esta vez haremos dicha evaluación mediante una macro para definir P(t). Los parámetros los vamos a leer desde unas celdas ubicadas en la columna C. Para hacer referencia a una celda, se usa el código Cells(fila,columna) pero escribiendo 'columna' en formato numérico. Por ejemplo, la celda C5 se invoca como Cells(5,3) Lo primero que hacemos es escribir, en el editor de VBA, la fórmula de P(t), luego la invocamos en la celda F3 (de nuestra hoja de ejemplo) y arrastramos. Para esto, se siguen los siguientes pasos: 1. En primer lugar, abrimos una hoja Excel, que se llame por ejemplo Poblacion.xls. Luego se escriben los valores de los parámetros, tal y como puede observarse en la siguiente figura:

Ubicación inicial de los parámetros. 2. Ahora ingresamos al menú y en la opción Vista seleccionamos Macros. Luego se elige Editor de Visual Basic. Nuevamente, en el menú de la ventana que se abre, se elige Insertar, para luego seleccionar Módulo y escribir el siguiente código:

Function P(t) P0 = Cells(2, 3) 'P0 esta en la celda C2 LimPobl = Cells(4, 3) 'K esta en la celda C4 k = Cells(5, 3) 'k esta en la celda C5 A = (LimPobl - P0) / P0 P = LimPobl / (1 + A * Exp(-k * t)) End Function

De esta forma, la ventana de edición de Visual Basic, quedaría así:

Captura de algunos parámetros constantes de las celdas de la hoja.

3. Una vez que ha sido editado el código de la macro, se guarda y salimos del ambiente de programación en Visual Basic para volver a la hoja electrónica de donde partimos. Este retorno se hace siguiendo el menú Archivo y seleccionando Cerrar y Volver a Excel. Para evaluar la función P(t) en los valores de t que están en la fila que inicia en F2, nos situamos en la celda F3 y se digita +P(F2). Luego se arrastra hasta J2 para copiar la fórmula, quedando:

Resultado final al evaluar la macro del modelo poblacional. Elementos de programación en VBA Un programa computacional escrito mediante cualquier lenguaje de programación puede verse a grandes rasgos como un flujo de datos, algunos jugando el papel de datos de entrada, otros son datos que cumplen alguna función temporal dentro del programa y otros son datos de salida. A lo largo del programa es muy frecuente que sea necesaria la entrada en acción de otros programas o procesos. A mayor complejidad del problema que resuelve el programa, mayor es la necesidad de programar por aparte algunos segmentos de instrucciones que se especializan en una tarea o conjunto de tareas. Hay tres tipos de estructuras básicas que son muy utilizadas en la programación de un algoritmo, a saber, la estructura secuencial, la estructura condicional y la repetitiva. A continuación se explica, con ejemplos programados como macros de Excel, estas estructuras. También se incluyen los programas en seudo código y diagramas de flujo para explicar de un modo más gráfico la lógica del programa. El uso de estos últimos es cada vez menor, pues el seudocódigo por lo general es suficientemente claro y se escribe en lenguaje muy cercano al lenguaje natural. Identificadores Los identificadores representan los objetos de un programa (constantes, variables, tipos de datos, procedimientos, funciones, programas, campos de registros, etc.). Un identificador es una secuencia de caracteres que puede ser de cualquier longitud, pero sólo 255 primeros caracteres son significativos. Un identificador se caracteriza por estas reglas:

1. Debe comenzar con una letra (A a Z, mayúsculas o minúsculas) y no puede contener blancos. 2. Letras, dígitos y caracteres subrayados (_) están permitidos después del primer carácter excepto como último carácter. 3. No se puede utilizar una palabra reservada como identificador. 4. Los caracteres %, &, !, #, @, $ solo pueden ser usados al final del identificador(variable) para indicar el tipo de datos que almacenará dicha variable. Estos pueden ser identificadores válidos:     

Nombre Area_Rectangulo Lado1 Impuesto_Sobre_La_Renta ImpuestosTotales

Estos son identificadores no validos:    

Area&Rectangulo Lado 1 Impuesto@Renta For

El ampersand (&) solo puede ser usado al final Contiene espacios en blanco Tiene un @ después del primer carácter Es una palabra reservada en Visual Basic

Comentarios Cuando una frase va precedida de una comilla simple (‘), Visual Basic Interpreta que esa frase es un comentario y no ejecuta acción alguna sobre ella. Ejemplo: ‘Operando suma = n1 + n2 ‘Esto sumara las dos variables. resta = n1 - n2 multi = n1 * n2 ‘Multiplicará las dos variables solicitadas. Constantes Es un valor que no cambia durante la ejecución de un programa, Visual Basic admite números decimales (base 10), hexadecimales (base 16) y octales (base 8). Un número hexadecimal va precedido por el &H y un número octal va precedido por &O (letra O). Los comentarios son de mucha utilidad para poder entender el código del programa utilizado. En programas con pocas líneas de código puede ser no importante pero para proyectos realmente complejos o desarrollados por varios programadores su importancia es evidente. Por ejemplo: 9 &H9 & 011

17 &HF &0665

1034 &H40A &020123

Son números decimales Son números hexadecimales Son números octales

Una constante de caracteres o constantes alfanuméricas es una cadena de caracteres encerrada entre comillas dobles. Por ejemplo: “Grados Centígrados:” ‘Las constantes son privadas por defecto Const igv=0.19

‘Declaración de una constante pública Public Const saludo= “Bienvenido” ‘Declaración de un entero constante Private Const altura as Integer=15 

Es aconsejable definir todas las constantes globales en un único módulo.

Variables Una variable contiene un valor que puede modificarse a lo largo de la ejecución de la aplicación. Cada variable tiene atributos propios como: 

 

a.

b.

Nombre: es el nombre que utilizaremos para referirnos a la variable en la aplicación. Tipo: el tipo determina qué clase de valores puede almacenar la variable. Ámbito: específica en qué parte de la aplicación es conocida la variable y por lo tanto puede utilizarse. Consideraciones en Nombres de las Variables 

El nombre de una variable tiene que comenzar por una letra, puede tener hasta 255 caracteres de longitud y debe ser único de su ámbito.



Los caracteres puedes ser letras, dígitos, el carácter subrayado y los caracteres de declaración del tipo de la variable (%,&,!,#,@ y $)



No se puede utiliza el punto ni otros caracteres que tiene un significado especial para Visual Basic; por ejemplo, los paréntesis. Los caracteres de declaración del tipo, cuando se utilicen, tiene que ocupar la última posición.



El nombre de una variable no puede ser una palabra reservada. Una palabra reservada tiene un significado especial en Visual Basic como for, val, hide, caption, long etc.

Tipos de Datos Intrínsecos

Todas las variables tienen un tipo de dato que determina la clase de datos que pueden almacenar. Una variable puede ser de alguno de los tipos siguientes: Tipo

Descripción

Car-tipo

Rango

Integer

Entero (2 bytes)

%

-32768 a 32.767

Long

Entero largo(4 bytes)

&

-2147.483.648 a 2.147.483.648

Single

Coma flotante. Precisión simple (4bytes)

!

-3,40E+38 a -3,40E+38ª

Double

Coma flotante. Precisión doble (8 bytes).

#

-1,79D+308 a -1,79D+308

Currency Número con punto decimal fijo (8 bytes)

@

+/- 922.337.203.685.477,5807

String

Cadena de caracteres de longitud variable: (10 bytes + 1 bytes por carácter.)

$

De 0 a 65500 caracteres aprox.

Byte

Carácter (1 byte)

(ninguno)

0 a 255

Boolean

Boolean (2 bytes)

(ninguno)

True o False

Date

Fecha/Hora (8 bytes)

(ninguno)

1/enero/100 a 31/diciembre/9.999

Object

Referencia a un objeto (4 bytes)

(ninguno)

Cualquier referencia a tipo Object

Variant

Fecha/hora; números enteros, reales 0 caracteres (16 bytes + 1 byte/car, en cadenas de caracteres).

(ninguno)

F/h: como Date: números: mismo rango que el tipo de valor almacenado.

Decimal

Números con 0 a decimales (14 bytes)

(ninguno)

Valor mayos con 0 decimales.

c.

28

Declaraciones de variables Antes de utilizar una variable, es aconsejable declarar su tipo. Una forma de hacerlo es utilizando la sentencia DIM (o una de las palabras Public, Private o Static). Cualquier declaración se éstas inicia las variables numéricas con el

valor cero y las variables alfanuméricas con el valor cero y las variables alfanuméricas con el carácter nulo. Por ejemplo: Dim I As Integer ‘I una variable entera Dim R As Double ‘R variable real de precisión doble Dim Nombre As String ‘Nombre variable de cadena Dim Etiqueta As String * 10 ‘Etiqueta variable de caracteres con longitud fija (10 caracteres) Dim F as Currency ‘F como variable fraccionaria Dim L as Long, X as Currency ‘L como variable entera larga y X como variable fraccionaria.

Observa que la sentencia Dim puede realizar más de una declaración. La cláusula As tipo de la instrucción. Dim le permite definir el tipo de dato o de objeto de la variable que va a declarar. 

Cuando se declara una variable y no se define su tipo se asume que es de tipo Variant. Por ejemplo: Dim A, B As Integer Aquí se considera A (por omisión) es de tipo Variant y B de tipo Integer.





Otra forma de declarar una variable es utilizando los caracteres de declaración de tipo. Por ejemplo: I% Variable entera. R#

Variable real de Precisión doble.

Nombres$

Cadena de caracteres de longitud variable

f@

Variable fraccionaria

Cuando se utiliza una variable que no se ha declarado, se asume que es de tipo Variant por ejemplo: L=”dato” L=3.25678

d.

Option Explicit La sentencia Option Explicit en la sección de declaraciones del formulario y del módulo, genera un mensaje de error si se encuentra una variable no declarada explícitamente. Si se desea que esta opción este siempre presente en cada aplicación seleccione menú herramientas/opciones/editor/Requerir declaración de variables.

e.

Operadores Un operador es un símbolo o palabra que ejecuta una a operación matemática o maneja información. La siguiente tabla muestra el conjunto de operadores que soporta Visual Basic. Tipo Aritmético

Operación Exponenciación. Cambio de signo Multiplicación y división División entera Resto de una división entera Suma y resta Concatenación Concatenar o enlazar Igual, distinto, menor, mayor… Relacional Negación Lógico And Or inclusiva Or exclusiva Equivalencia (opuesta a Xor) Implicación (falso si primer operando verdadero y segundo operando falso).

Operador ^ *, / \ Mod +,& =,,,= Not And Or Xor Eqv Imp

Flujo secuencial El flujo secuencial consiste en seguir una secuencia de pasos que siguen un orden predeterminado. Por ejemplo, un programa que a partir de un número N de días, calcula la cantidad de segundos que hay en esta cantidad de días. Este programa se puede ver como una secuencia de varios pasos:      

Inicio: Ingresa el número N de días Paso 1: H = 24*N, para determinar la cantidad de horas Paso 2: M = 60*H, para determinar la cantidad de minutos. Paso 3: S = 60*M, para determinar la cantidad de segundos. Paso 4: Retorne S. Fin.

Flujo secuencial La macro correspondiente a esta secuencia de cálculos puede escribirse como sigue:

Function CalculeSegundos(Dias) CantHoras = 24 * Dias CantMinutos = 60 * CantHoras CalculeSegundos = 60 * CantMinutos End Function

Flujo condicional (If - Else) Un flujo condicional se presenta en un programa o procedimiento que debe escoger una acción o proceso a ejecutar, dependiendo de condiciones que puedan cumplirse. El caso más sencillo ocurre cuando el programa verifica si una condición se cumple y en caso de ser verdadera ejecuta un proceso, en tanto que si es falsa ejecuta otro proceso. En VBA tenemos la instrucción If...Then...Else Ejecuta condicionalmente un grupo de instrucciones, dependiendo del valor de una expresión. Sintaxis

If condición Then instrucciones Else instrucciones-else Puede utilizar la siguiente sintaxis en formato de bloque: If condición Then instrucciones ElseIf condición Then instrucciones-elseif ... Else instrucciones-else End If Nota: En la ayuda del editor de Visual Basic, tenemos acceso a la referencia del lenguaje. Ejemplo 2 En este ejemplo veremos cómo usar la instrucción If...Then...Else Obtener un programa que calcule aproximaciones de √ , sabiendo que la sucesión { } converge a √ , definida en forma recurrente mediante la relación:

{

(

)

El programa deberá estimar el error absoluto de las aproximaciones y será capaz de escribir un mensaje de éxito o de fracaso, dependiendo de si el error absoluto es o no menor que una tolerancia dada.

Resultado de la aproximación de √ . Para los resultados que aparecen en la gráfica anterior pueden programarse las siguiente macros para ser evaluadas en cada columna:

Function AproxDeRaiz(x) AproxDeRaiz = (1 / 2) * (x + 2 / x) End Function Function CalculoElError(Aproximacion, ValorExacto) CalculoElError = Abs(Aproximacion - ValorExacto) End Function Function verificaTol(Error, Tol) If (Error < Tol) Then verificaTol = "EXITO" Else verificaTol = "FRACASO" End If End Function

El diagrama siguiente ilustra la forma en que esta última función de verificación actúa con base en el valor de sus dos parámetros de entrada:

Diagrama de flujo condicional para verificar si se alcanzó la tolerancia. Flujo repetitivo (For-Next, While-Wend) El flujo repetitivo se presenta en un algoritmo cuando se requiere la ejecución de un proceso o parte de un proceso sucesivamente, hasta que ocurra una condición que permita terminar. Este tipo de flujos repetitivos se presentan en tres formas que obedecen a maneras diferentes de razonarlos pero que en el fondo hacen lo mismo:   

Utilizar un contador que empiece en un número y termine en otro, ejecutando el proceso cada vez que el contador tome un valor distinto. Mientras una condición sea verdadera, ejecutar un proceso y regresar a la condición. Ejecutar un proceso, hasta que una condición deje de cumplirse.

En VBA tenemos las siguientes instrucciones para realizar procesos iterativos: 1. For ... Next Repite un grupo de instrucciones un número especificado de veces. Sintaxis (las instrucciones entre `[ ]' son instrucciones adicionales) For contador = inicio To fin [Step incremento] instrucciones [Exit For] instrucciones Next contador 2. While...Wend Ejecuta una serie de instrucciones mientras una condición dada sea True. Sintaxis While condición intrucciones Wend Nota: No hay un Exit While. En una subrutina, si fuera necesario, se podría usa Exit Sub 3. Una instrucción muy parecida a While pero más eficiente de Do Sintaxis Do while condición instrucciones [Exit Do] Loop Ejemplo 3 Para ilustrar estas formas de realizar un flujo repetitivo, vamos a aproximar la suma de una serie alternada con un error estimado menor que una cantidad TOL dada. Consideremos la serie alternada



 1 k 1

k

1 1 1 1  1     ... 2 k 4 9 16

La suma parcial N-ésima viene dada por: N

S N    1 k 1

k

1 1 1 1 N 1  1     ...   1 2 k 4 9 16 N2

es decir:

S1   1

 1

S2   1  1/ 4

  0.75

S3   1  1/ 4  1/ 9

  0.861111...

S4   1  1/ 4  1/ 9  1/16   0.798611... . . . 

1 es convergente. Si su k2 k 1 suma es S, al aproximarla con la suma parcial SN , el error de la aproximación es menor De acuerdo con la teoría de series alternadas, la serie

que

1

 N  1

2

  1

k

, es decir:

S  SN 

1

 N  1

2

Primer problema

Dada una tolerancia TOL, calcular cada una de las sumas parciales hasta que el error de aproximación sea menor que TOL

Sumas parciales y estimación del error

Implementamos dos macros, una para el cálculo de las sumas parciales y otra para hacer la verificación del error estimado. En este caso, vamos a suponer que TOL está en la celda B33

Function sumaParcial(hastaN) Dim Acum, signo As Integer Acum = 0 signo = -1 For k = 1 To hastaN Acum = Acum + signo * 1 / k ^ 2 signo = -signo Next k sumaParcial = Acum End Function '-------------------------------------------------------------------Function verificaTol(elN, tol) If (1 / (elN + 1) ^ 2 > tol) Then verificaTol = "Error estimado > " + Str(tol) 'tol es un número Else 'no una String verificaTol = "OK, error estimado