Guía y Primer   Taller   de Excel Intermedio 

Funciones Básicas

En Excel existen gran variedad de funciones que puede aplicar a sus tablas o datos. Una función puede ser utilizada únicamente para obtener un resultado o juntarlo con una fórmula y obtener mayor capacidad de operación.

Existen funciones básicas en Excel para obtener resultados simples y sencillos y será un buen punto de partida para comenzar a entrar al mundo de las funciones.

LA FUNCIÓN SUMA

Como su nombre lo dice, esta función permite sumar valores de las celdas, se utiliza mejor cuando se suman rangos. La sintaxis de la función SUMA es la siguiente:

1. =SUMA(Número1:[Número2])

Con la nueva fórmula  se digita la palabra Suma, se abre el paréntesis, se digita la primera celda (es B4), se agregan los dos puntos, se digita la última celda (f4   Excel automáticamente selecciona todo el rango)  y se cierra el paréntesis. 

Queda de esta forma:  =Suma(b4:f4)

 El Resultado es el mismo, pero la fórmula es mas corta.

LA FUNCIÓN PROMEDIO

La función Promedio en Excel sirve para obtener la media aritmética entre un grupo de valores que le pasemos como parámetros. Básicamente, lo que hace es sumar todos los valores que le pasemos y los divide entre el conteo de los mismos.

=PROMEDIO(Número1;[Número2])

Retomando el ejercicio vamos a encontrar el promedio de la venta de autos de cada día en la semana. Quedaría:

Ejercicio sumando las celdas y lo dividimos en la cantidad de celdas sumadas

 El resultado

Da el mismo resultado

LA FUNCIÓN Máxima

Nos permite  obtener el valor máximo de un conjunto de valores, Ejemplo la venta máximo, la nota máxima, el sueldo máximo...

Sintaxis:

1. =MAX(Número1;[Número2])

Ahora mostramos la máxima venta de autos en el día y la semana

Resultado

LA FUNCIÓN Mínima

 La función MIN nos devuelve el valor mínimo de una lista de valores. Es lo contrario de la función máxima.

Sintaxis:

=MIN(Número1;[Número2])

Ahora mostramos la venta mínima del día y la semana.

Resultado mínimo

LA FUNCIÓN CONTAR

La función contar cuenta la cantidad de celdas seleccionadas

Sintaxis:

=CONTAR(Número1;[Número2])

Ahora vamos a contar la cantidad de ventas del siguiente ejercicio

Resultado

                 

                                           TALLER

Resolver los siguientes ejercicios en Excel

1) Encontrar el total de ventas de los siguientes artículos

Insertar un gráfico de columnas

1) Encontrar la nota final de los siguientes aprendices, junto con el promedio de notas, nota máxima,  mínima y la cantidad de notas.

Insertar un gráfico de circular o  de áreas.

Enviar al correo electrónico:

wfsuarez73@misena.edu.co

1)

2)

3)

FUNCIÓN Y  

4-   SI ES MAYOR A 35 AÑOS Y EL SEXO ES MASCULINO; ES PRESIDENTE, DE LO CONTRARIO NO. 

TAMBIÉN REALIZAR CON FUNCIÓN "O"

5)

EL EJERCITO ENTREGA LIBRETA MILITAR A QUIENES  VIVAN EN IBAGUÈ, QUE         SEAN HOMBRES Y LA EDAD  MAYOR A 30 AÑOS

NOMBRE	CIUDAD	SEXO	EDAD	LIBRETA
Mario	Bogotá	H	40
Manolo	Ibagué	H	35
Ismael	Bogotá	H	48
Carmen	Bogotá	M	48
Susana	Ibagué	M	20
Alam	Ibagué	H	33
Sandra	Bogotá	M	18
Pedro	Medellín	H	33
Julián	Ibagué	H	41
María	Bogotá	M	32
Andrés	Bogotá	H	27
Mónica	Ibagué	M	28
Susana L.	Bogotá	M	22
Juan	Ibagué	H	34

TALLER AMARRADO DE CELDAS

Encontrar el valor comprendido de las familias en el mercado.  Manejando referencia absoluta y referencia relativa.

TABLAS DINÁMICAS

Construir a partir de los siguientes datos, cuatro tablas dinámicas que muestren la siguiente información: Tabla dinámica 1: Suma de puntos por deportista y prueba. Tabla dinámica 2: Suma de puntos por país y prueba. Tabla dinámica 3: Suma de puntos por país, deportista, y prueba. Tabla dinámica 4: Media de puntos por país y prueba. Las cuatro tablas dinámicas deben estar una debajo de la otra y en la misma hoja.
País	Deportista	Prueba	Puntos
Francia	Pierre	Carrera	8
Francia	Phillipe	Carrera	7
España	Ramón	Carrera	6
España	Juan	Carrera	5
España	Alberto	Carrera	4
Inglaterra	John	Carrera	3
Inglaterra	Tom	Carrera	6
Francia	Pierre	Natación	4
Francia	Phillipe	Natación	5
España	Ramón	Natación	2
España	Juan	Natación	7
España	Alberto	Natación	6
Inglaterra	John	Natación	3
Inglaterra	Tom	Natación	5
Francia	Pierre	Bicicleta	3
Francia	Phillipe	Bicicleta	4
España	Ramón	Bicicleta	8
España	Juan	Bicicleta	8
España	Alberto	Bicicleta	9
Inglaterra	John	Bicicleta	4
Inglaterra	Tom	Bicicleta	4

 Guía Séptima  y Taller  de Excel Avanzado

Visual Basic  Excel

El Editor de Visual Basic, o Editor de VBA,  forma parte del programa Microsoft Excel, este Editor nos permite crear, modificar o emplear Macros, las cuales nos permiten ampliar el funcionamiento por defecto de la funcionalidad de Excel.

Este editor es también conocido como VBE por sus siglas en ingles (Visual Basic Editor).

¿Cómo acceder al Editor de Visual Basic?

Para para poder acceder al Editor de Visual Basic se puede emplear la combinación de teclas ALT + F11, si bien esto nos permite ingresar y trabajar con el Editor de VBA, lo mejor es tener disponible una Ficha conocida como Ficha Programador o Ficha Desarrollador, la cual contiene mas opciones.

Primer Ejercicio

Mostrando un mensaje

Sólo tienes que insertar en tu macro el comando MsgBox. En el ejemplo siguiente:

MsgBox "texto del mensaje"

Pasos:

ALT + F11  

- Clic en el menú herramientas

- Clic en macros

- Digitar el nombre de la macro y clic en crear

-Pegamos el código o lo digitamos

 Código: MsgBox "mi nombre es..."

- Cerrar.

-Ejecutar la macro

Segundo Ejercicio

Escribir la fecha y la hora actual en la hoja de cálculo. El siguiente ejemplo inserta estos datos en la celda A1, vea.

Sub escribirDataEHora ()
Range ("A1") = Now
End Sub

Tercer  Ejercicio

Código para pasar numero a letra con decimales

'FUNCION ALETRAS

Function ALETRAS(Numero As Double, Optional DecimalEnLetra As Boolean) As String

'Declaracion de variables

Dim Moneda As String

Dim Monedas As String

Dim Centavo As String

Dim Centavos As String

Dim Con As String

Dim NumCentavos As Double

Dim Letra As String

Const Maximo = 1999999999.99

' Parámetros

Moneda = "Peso"

Monedas = "Pesos"

Decimal1 = "Centavo"

Decimales = "Centavos"

Con = "Con"

'Si el numero esta dentro de 0 y 1999999999.99 (Maximo) entonces

'convertir el numero a letras

If (Numero >= 0) And (Numero <= Maximo) Then

    Letra = LETRAS((Fix(Numero)))

    'Si solo es un numero entonces

    'agregar la moneda en singular

    If (Numero = 1) Then

        Letra = Letra & " " & Moneda

    'De lo contrario agregar la moneda en plural

    Else

        Letra = Letra & " " & Monedas

    End If

    NumCentavos = Round((Numero - Fix(Numero)) * 100)   'Pasar a decimales (al numero le resta el numero entero y lo multiplica por 100)

    'Si los centvos son mayores a cero entonces

    If NumCentavos >= 0 Then

        'Si el parámetro DecimalEnLetra es VERDADERO

        If DecimalEnLetra Then

        'Convertir los centavos en letra

            Letra = Letra & " " & Con & " " & LETRAS(Fix(NumCentavos))

            'Si el centavo es uno agregar leyenda Centavo (Singular)

            If (NumCentavos = 1) Then

                Letra = Letra & " " & Decimal1

            'De lo contrario agregar la leyenda Centavos (Plural)

            Else

                Letra = Letra & " " & Decimales

            End If

         'De lo contrario mostrar los centecimos como número

         Else

            'Si los centavos son menores a 10 entonces

            If NumCentavos < 10 Then

                Letra = Letra & " " & Con & " " & " 0" & NumCentavos & "/100"

            Else

            'De lo contrario

                Letra = Letra & " " & Con & " " & NumCentavos & "/100"

            End If

         End If

    End If

    'Regresar el resultado final de la conversión

    ALETRAS = Letra

Else

    'Si el Numero no está dentro de los límites mostrar un mensaje de error

    ALETRAS = "ERROR: el importe esta fuera del límite."

End If

End Function

'Funcion LETRAS

Function LETRAS(Numero As Long) As String

'Declaracion de las variables

Dim Unidades, Decenas, Centenas

Dim Resultado As String

'Numeros en letras

Unidades = Array("", "Un", "Dos", "Tres", "Cuatro", "Cinco", "Seis", "Siete", "Ocho", "Nueve", "Diez", "Once", "Doce", "Trece", "Catorce", "Quince", "Dieciséis", "Diecisiete", "Dieciocho", "Diecinueve", "Veinte", "Veintiuno", "Veintidos", "Veintitres", "Veinticuatro", "Veinticinco", "Veintiseis", "Veintisiete", "Veintiocho", "Veintinueve")

Decenas = Array("", "Diez", "Veinte", "Treinta", "Cuarenta", "Cincuenta", "Sesenta", "Setenta", "Ochenta", "Noventa", "Cien")

Centenas = Array("", "Ciento", "Doscientos", "Trescientos", "Cuatrocientos", "Quinientos", "Seiscientos", "Setecientos", "Ochocientos", "Novecientos")

Select Case Numero

    Case 0

        Resultado = "Cero"

    Case 1 To 29

        Resultado = Unidades(Numero)

    Case 30 To 100

        Resultado = Decenas(Numero \ 10) + IIf(Numero Mod 10 <> 0, " y " + LETRAS(Numero Mod 10), "")

    Case 101 To 999

        Resultado = Centenas(Numero \ 100) + IIf(Numero Mod 100 <> 0, " " + LETRAS(Numero Mod 100), "")

    Case 1000 To 1999

        Resultado = "Mil" + IIf(Numero Mod 1000 <> 0, " " + LETRAS(Numero Mod 1000), "")

    Case 2000 To 999999

        Resultado = LETRAS(Numero \ 1000) + " Mil" + IIf(Numero Mod 1000 <> 0, " " + LETRAS(Numero Mod 1000), "")

    Case 1000000 To 1999999

        Resultado = "Un Millón" + IIf(Numero Mod 1000000 <> 0, " " + LETRAS(Numero Mod 1000000), "")

    Case 2000000 To 1999999999

        Resultado = LETRAS(Numero \ 1000000) + " Millones" + IIf(Numero Mod 1000000 <> 0, " " + LETRAS(Numero Mod 1000000), "")

End Select

LETRAS = Resultado 

End Function

 

Pasos:

Seleccionar y copiar el código

- Abrir VisualBasic

- Clic en Insertar

-Clic en Modulo

- Pegamos el código

- Cerrar

- Clic donde saldrá los números en texto

- Abrír  la función con igual, digitar aletras, paréntesis, clic en la celda a pasar en letras, cerrar el paréntesis. Enter

=ALETRAS(C3)

TALLER

1) Crear  macros con el comando 

    MsgBox "Bienvenidos a esta web!", vbExclamation

MsgBox "Bienvenidos a esta web!", vbYesNo, "Mi título"

 

Combinemos varios botones

MsgBox "Bienvenidos a esta web!", vbYesNo + vbExclamation, "Mi título"

Dentro de un botón

2)

TALLER EN FORMACIÓN

8.  En el total que salga en letras en la siguiente celda:

9.  Una macro con un botón que salga el mensaje de la agencia de viaje.

TALLER

1) Crear  macros con el comando MsgBox donde muestre:

    MsgBox "Bienvenidos a esta web!", vbExclamation

MsgBox "Bienvenidos a esta web!", vbYesNo, "Mi título"

 

Combinemos variso botones

MsgBox "Bienvenidos a esta web!", vbYesNo + vbExclamation, "Mi título"

Dentro de un botón

Taller final

1) Encontrar la venta total 

2) Mostrar total en letras

3) Ingresar botón con macro que limpie  e imprima (2)

4) Mostrar un mensaje con exclamación con visual Basic