Universidad de Oriente

Ncleo de Anzotegui
Escuela de Ing. y Cs. Aplicadas
Departamento de Ing. Industrial

APUNTES DE
MICROSOFT
EXCEL 2.007
By Longo:
Msc. Joseph Stalin Lojn Paladines

Hoja de clculo & Grficos

Diagrama de flujo
Macros
Introduccin a Visual basic para aplicaciones

Barcelona - Venezuela, Abril 2.011

Serie de consulta LONGO

Apuntes de Microsoft Excel - 1 -

INTRODUCIN
Excel es una aplicacin del tipo hoja de clculo, desarrollada por Microsoft en la cual se combinan las
capacidades de una hoja de clculo normal, listas, base de datos, grficos, lenguaje propio de
programacin y generacin de macros; todo dentro de la misma aplicacin.
Con Excel se puede trabajar simultneamente con un nmero ilimitado de hojas de clculo siempre y
cuando los recursos de su computador lo soporten, permitiendo guardar, manipular, calcular, y analizar
datos numricos, textos y formulas, adems se puede resumir toda esa informacin y presentarla
mediante grficos de distinto tipo, que pueden ser creados sobre la misma hoja de clculo.
El objetivo de este material consiste en ofrecer al participante una serie de herramientas bsicas y
avanzadas, as como nuevos conocimientos para aprovechar al mximo las ventajas de Excel y mejorar
el rendimiento de sus actividades. No obstante es importante resaltar que algunos de estos ejercicios
han sido extrados del manual Recordando al Microsoft Excel del prof. Pedro Salazar.

OBJETOS DE EXCEL

Libro de hojas de clculo: Es el documento principal de Excel, el cual est formado por un conjunto
variable de hojas de clculo.
Hoja de clculo: Matrices de celdas, es decir arreglos bidimensionales de filas y columnas.
Celdas: Es la interseccin entre una fila y una columna de la hoja de clculo, representa la unidad
de almacenamiento de datos de Excel, ya que guarda un solo datos a la vez.

TIPOS DE DATOS EN EXCEL

Rtulos o texto: Es una cadena de caracteres alfanumricos, justificados por defecto a la izquierda
Nmeros: Constituido solo por nmeros incluyendo el separador decimal (punto o coma).
Justificacin por defecto a la derecha.
Formulas: Es una secuencia de nmeros, caracteres, operadores matemticos, funciones y
referencias de celdas que devuelven un nuevo valor. Se debe iniciar con el smbolo igual (con el fin
de diferenciarlos con los datos tipo rtulo). Por defecto, se actualizan automticamente y muestran
el resultado; ms no su contenido.
Fecha: Equivalentes numricamente a los das transcurridos desde el primero de enero del ao
1.900 hasta la fecha indicada.
Hora: Equivale numricamente al decimal correspondiente a la fraccin del da transcurrido hasta la
hora indicada.

Serie de consulta LONGO

Apuntes de Microsoft Excel - 2 -

AREAS DE LA PANTALLA
Barra de men

Barra de formulas
Identificador de columnas
Identificador de filas
Celda
Etiquetas de hojas

RANGO DE CELDAS
Es un conjunto de celdas organizadas en forma rectangular. Un rango puede estar conformado por ms
de un rea rectangular. Su sintaxis es (CeldaInicial:CeldaFinal), donde:
CeldaInicial: Es la celda ubicada ms arriba y ms a la izquierda en el rango
CeldaFinal: Es la celda ubicada ms abajo y ms a la derecha en el rango.
Para separar varias reas rectangulares se utiliza punto y coma (;). Ejemplos:
(B2:D5)

(A2:C4;E3:E6)

Serie de consulta LONGO

Apuntes de Microsoft Excel - 3 -

FUNCIONES INCORPORADAS

MATEMATICAS
Abs(nmero)

Devuelve el valor absoluto de un nmero

Aleatorio( )

Devuelve un numero aleatorio mayor o igual que cero y menor

que 1

Cos(nmero)

Devuelve el coseno de un ngulo. Nmero es el ngulo en

radianes.

Entero(nmero)

Redondea un nmero hasta el entero inferior ms prximo

Pi()

Devuelve el valor de Pi (3.1419..) con precisin de 15

dgitos

Potencia(nmero;potencia)

Devuelve el resultado de elevar el nmero a una potencia)

Producto(nmero1;nmero2;.)

Multiplica todos los nmeros especificados como argumentos

Raiz(nmero)

Devuelve la raz cuadrada

Redondear(nmero;num_decimales)

Redondea un nmero al nmero de decimales especificado

Seno(nmero)

Devuelve el seno de un ngulo determinado. Nmero:

Representa el ngulo en radianes del que se desea obtener el
seno. Grados*Pi()/180 = Radianes

Suma(nmero1;nmero2)

Suma todos los nmeros en un rango de celdas

Sumar.Si(rango;criterio;rango_suma) Suma las celdas que cumplen determinado criterio o condicin

ESTADISTICAS
Contar(Ref1;Ref2)

Cuenta el nmero de celdas que contienen nmeros y los

nmeros que hay en la lista de argumentos

Contar.Blanco(rango)

Cuenta el nmero de celdas en blanco dentro de un rango

especificado.

Contar.Si(rango;criterio)

Cuenta las celdas en el rango que coinciden con la condicin

dada

Contara(valor1;valor2;)

Cuenta el nmero de celdas no vacas

Desvest(nmero1;nmeo2;)

Calcula la desviacin estndar de una muestra. Omite los

valores lgicos y el texto.

Max(nmero1;nmeo2;)

Devuelve el valor mximo de una lista de valores. Omite los

valores lgicos y de texto

Mediana(nmero1;nmeo2;)

Devuelve la mediana o el nmero central de un conjunto de

nmeros

Min(nmero1;nmero2;)

Devuelve el valor mnimo de una lista de valore. Omite los

valores lgicos y de texto

Promedio(nmero1;nmero2;..)

Devuelve el promedio (media aritmtica) de los argumentos

Serie de consulta LONGO

Apuntes de Microsoft Excel - 4 -

TEXTO
Concatenar(texto1;texto2..)

Une varios elementos de texto es uno solo

Derecha(texto;num_caracteres)

Devuelve el nmero especificado de caracteres (del

lado derecho) de una cadena de caracteres

Igual(texto1;texto2)

Comprueba si dos cadenas de texto son exactamente

iguales y devuelve VERDADERO o FALSO. Se
diferencia entre maysculas y minsculas

Encontrar(texto_buscado;dentro_del_texto;
num_inicial)

Devuelve la posicin inicial de una cadena de texto

dentro de otra cadena de texto. BUSCAR diferencia
entre maysculas y minsculas. El texto_buscado es el
texto que se desea encontrar. No se admite caracteres
comodn

Espacios(texto)

Quita todos los espacios del texto, excepto los espacios

individuales entre palabras

Extrae(texto;posicin_inicial;num_caracteres) Devuelve los caracteres del centro de una cadena de

texto, dada una posicin y longitudes iniciales
Izquierda(texto;nm_caracteres)

Devuelve el nmero especificado de caracteres (del

lado derecho) de una cadena de caracteres

Largo(texto)

Devuelve el nmero de caracteres de una cadena de

texto

Mayusc(texto)

Convierte una cadena de texto en letras maysculas

Minusc(texto)

Convierte todas las letras de una cadena de texto en

minsculas

Nompropio(texto)

Convierte una cadena de texto en maysculas o

minsculas, segn corresponda; la primera letra de
cada palabra en mayscula y las dems en minuscula

Repetir(texto;nm_de_veces)

Repite el texto un nmero determinado de veces.

LOGICAS
No(valor_lgico)

Cambia FALSO por VERDADERO y VERDADERO por

FALSO

O(valor_lgico1;valor_lgico2;.)

Comprueba si alguno de los argumentos es VERDADERO.

Devuelve FALSO si todos los argumentos son FALSOS

Si(prueba_lgica;valor_si_verdadero; Comprueba si se cumple una condicin, y devuelve un valor si

se evala como VERDADERO y otro valor si se evala como
valor_si_falso)
FALSO.
Y(valor_lgico1;valor_lgico2;)

Devuelve VERDADERO si todos los argumentos son

VERDADEROS

Serie de consulta LONGO

Apuntes de Microsoft Excel - 5 -

FECHA
Ahora()

Devuelve la fecha y hora actuales con formato de fecha y hora

Ao(nm_serie)

Devuelve el ao, un entero en el rango 1900 - 9999

Dia(nm_de_serie)

Devuelve el da del mes (un numero de 1 a 31)

Diasem(nm_de_serie;tipo)

Devuelve un nmero de 1 a 7 que identifica el da de la semana.

Num_de_serie es un numero que representa una fecha. Tipo es un
numero que representa el primer da de la semana

Hoy()

Devuelve la fecha actual con formato de fecha

Mes(nm_de_serie)

Devuelve el mes, un numero entero de 1(enero) a 12 (diciembre)

OTRAS FUNCIONES
Pago(tasa;nper;va;vf;tipo)

Calcula el pago de un prstamo basado en pagos y tasa de inters

constante

Texto(valor;formato)

Convierte un valor en texto, con un formato de nmero especifico.

VALOR: Es un valor numrico, una formula que evala un valor
numrico o una referencia a una celda que contiene un valor numrico.
FORMATO Es un nombre de categora: General, Numero,
Moneda, Fecha, etc.

OPERADORES PARA HOJA DE CALCULO Y MACROS

OPERADORES MATEMATICOS
+ Suma
- Resta
* Multiplicacin
/ Divisin
^ Potencia

OPERADORES DE COMPARACION
= Igual
> Mayor
< Menor
>= Mayor igual
<= Menor igual
< > Diferente

Serie de consulta LONGO

Apuntes de Microsoft Excel - 6 -

EJERCICIO 1: Realizar una suma sencilla

Enlugardeescribirlaformula=SUMA(),tambinpuedeshacerclicenelicono
paraqueaparezcaelasistenteytrabajardeforma
insertarfuncin
masfcil.

Serie de consulta LONGO

Apuntes de Microsoft Excel - 7 -

REFERENCIAS RELATIVAS
A medida que una formula se copia, sta apunta a nuevas referencias.

REFERENCIAS ABSOLUTAS (se debe usar el smbolo $)

A medida que una formula se copia, sta apunta siempre a la misma referencia, siempre y cuando est
configurada para ello.
EJEMPLO
=A$2 * 50
=Abs($B4)
=Izquierda($E$5)

EXPLICACION
Se ha fijado la Fila 2
Se ha fijado la Columna B
Se ha fijado la Columna E y la Fila 5

Serie de consulta LONGO

Apuntes de Microsoft Excel - 8 -

EJERCICIO 2: Calcular el pvp a partir del costo y un % de utilidad fijo

EJERCICIO 3: Poner separador de miles y dos decimales al PVP

Sombrear el rango B4:E4

Clic en Inicio (barra de men)
Clic en Formato de celdas: nmero

Aparecer la pantalla de la derecha

Clic en la categora Nmero
Clic en usar separador de miles
En posiciones decimales, poner 2
Clic en Aceptar
Clic en cualquier celda
Hacer lo mismo con el COSTO
El resultado debe ser como la figura de la pgina siguiente:

Serie de consulta LONGO

Apuntes de Microsoft Excel - 9 -

EJERCICIO 4: Determinar si un alumno est aprobado o reprobado, utilizando la

funcin =SI(..)

Serie de consulta LONGO

Apuntes de Microsoft Excel - 10 -

EJERCICIO 5: Validar que los montos sean positivos y luego sumar, utilizando la
funcin O(.) dentro de la funcin =SI(..)

EJERCICIO 6: Calcular el promedio de notas de los varones

Pararesolveresteejerciciotambinsepuedeutilizarlafuncin
=PROMEDIO.SI(..)

Serie de consulta LONGO

Apuntes de Microsoft Excel - 11 -

EJERCICIO 7: Dadas una serie de cedulas, determinar en que mesa van a votar. Las
cedulas que terminen en 0,1,2,3,4,5, van a votar en la mesa 1. Las dems en la mesa
2.

EJERCICIO 8: Colocar en la celda D1, el rotulo SL. Luego crear una frmula que
coloque la segunda letra del nombre de cada persona.

Serie de consulta LONGO

Apuntes de Microsoft Excel - 12 -

MANEJO DE FECHAS

EJERCICIO 9: Calcular el nmero de das que falta para tu prximo cumpleaos.

EJERCICIO 10: Aplicar un formato de nmero a las celdas B1 y B2. Para ello debe
repetir el ejercicio 3, pero en posiciones decimales poner 0

EJERCICIO 11: Calcular el nmero de meses entre dos fechas de diferentes aos.
Escribir las fechas segn la siguiente planilla. Luego con una(s) formula(s) obtener
la respuesta

Serie de consulta LONGO

Apuntes de Microsoft Excel - 13 -

EJERCICIO 12: Calcular el tiempo que dur un vehculo en un estacionamiento.

EJERCICIO 13: Un coche entr en un estacionamiento el da 27/10/2009 a las 11

de la maana y sali el da 28/10/2009 a las 3 de la tarde. Cuntas horas dur ese
coche en el estacionamiento?. Desarrolle un(a) formula(s) para que haga el calculo
independientemente de la cantidad de das que el coche dure en el
estacionamiento.

Serie de consulta LONGO

Apuntes de Microsoft Excel - 14 -

DISEO DE GRAFICOS

EJERCICIO 14: Realizar la grafica del seno. Tal como se muestra en la figura
siguiente.

Para lograrlo debe realizar los siguientes pasos

En la columna A, genere una serie de datos desde -5 hasta 5 con un paso

de 0.5 tal como se muestra en la figura de la izquierda
En la columna B, escriba la formula del Seno
Luego sombree desde A1 hasta B22
Haga clic en Insertar/Dispersin. Aparecer la siguiente pantalla

Seleccione el tercer tipo de grafico Dispersin con lneas suavizadas

Luego puede mover o escalar el grfico segn su preferencia

Serie de consulta LONGO

Apuntes de Microsoft Excel - 15 -

EJERCICIO 15: Realizar un grfico de columnas de 3 gastos variables de una familia

en los meses de Enero a Mayo

Para lograrlo debe realizar los siguientes pasos

Escriba los datos segn la siguiente planilla

Luego sombree desde A1 hasta F4

Haga clic en Insertar/Columnas. Aparecer pantalla que est en el
lado izquierdo
Seleccione el grafico Columna Agrupada 3D
Luego puede mover o escalar el grfico segn su preferencia

Serie de consulta LONGO

Apuntes de Microsoft Excel - 16 -

EJERCICIO 16: Tomando como base el ejercicio anterior, realice un grfico de torta
donde se aprecie el gasto mensual de la familia Peluche.

Pararealizargrficosesnecesariosombrearrangosdedatos,cuandolosrangos
nosoncontiguossedebeutilizarlateclacontrolmientrassesombrea.Otra
alternativaconsisteenocultarlasfilasocolumnasquenoseannecesarias.

EJERCICIOS PROPUESTOS
EJERCICIO 17: Realizar una tabla de multiplicar. Para ello debe disear una sola
frmula y luego copiarla, tal como se muestra en la figura siguiente

El resultado debe ser como el mostrado en la pgina siguiente:

Serie de consulta LONGO

Apuntes de Microsoft Excel - 17 -

EJERCICIO 18: Tomando como base el ejercicio 17, coloque en la celda B12 el
numero 500. Ahora modifique la formula de tal manera que a cada resultado se le
sume el valor de la celda B12. Tal como se muestra en la figura siguiente:

Serie de consulta LONGO

Apuntes de Microsoft Excel - 18 -

EJERCICIO 19: Realice la tabla del 11 usando funciones de texto y una suma.

Explicacin:Latabladel11seresuelvesumandolosdosdgitosyesevalorse
debecolocarenelmediodedichosdgitos.Ejemplo:36*11=396.Debeutilizarlas
funcionesdetexto:ExtraeoensulugarIzquierdayDerecha,lasumadebe
realizarseconeloperador+

Serie de consulta LONGO

Apuntes de Microsoft Excel - 19 -

EJERCICIO 20: Escriba las fechas segn la siguiente planilla y luego indique si ese
ao es o no un ao bisiesto. Una de las dos funciones que debe utilizar es la
funcin Ao.

El resultado debe ser como el mostrado en la siguiente figura

Serie de consulta LONGO

Apuntes de Microsoft Excel - 20 -

EJERCICIO 21: Una empresa ha realizado las siguientes ventas y tiene una serie de
gastos variables. Primero usted debe calcular en cuanto se han incrementado las
ventas de cada mes con respecto a Enero.
Luego usted debe calcular los gastos en Bs. (de: luz, Comisiones, Papelera) de
cada mes segn los porcentajes de la columna G. En total debe disear dos formulas

Finalmente calcule el total de gastos de cada mes. El resultado se muestra a continuacin:

Serie de consulta LONGO

Apuntes de Microsoft Excel - 21 -

EJERCICIO 22: Una empresa de ventas tiene una lista de cuentas por cobrar (segn
se muestra en la siguiente planilla). Usted debe crear en la cela E2 una frmula para
determinar el status (vencida o vigente) tomando en cuenta la fecha de corte
(11/02/2011). Adems en la celda B15 debe contar el nmero de vencidas y en la
celda C15 el monto en Bs de las vencidas, el proceso similar debe hacerlo para las
vigentes.

Serie de consulta LONGO

Apuntes de Microsoft Excel - 22 -

EJERCICIO 23: Dada una lista de cedulas con su respectivo pas de origen y estado
civil, disee el Rif para cada uno. El ltimo digito del rif depende del estado civil
(para ello utilice la funcin si dentro de la funcin si)
NOTA: Cuando la cedula est por debajo de 10 millones se debe poner un 0 a la
izquierda.

El rif debe quedar de la siguiente manera:

Serie de consulta LONGO

Apuntes de Microsoft Excel - 23 -

EJERCICIO 24: Se tiene una lista de jvenes con su respectiva edad y el estado civil,
tal como se muestra en la figura siguiente. Disee una formula en la columna
Status para determinar si el joven est Apto o No apto para prestar el servicio
militar.

Paraqueunjovenpuedaprestarelserviciomilitardebesersolteroyalmismo
tiempomayordeedad.

Serie de consulta LONGO

Apuntes de Microsoft Excel - 24 -

DIAGRAMAS DE FLUJO
Los diagramas de flujo representan la forma ms tradicional para especificar los detalles algortmicos
de un proceso. Se utilizan principalmente en programacin, economa y procesos industriales; estos
diagramas utilizan una serie de smbolos con significados especiales. Los diagramas de flujo son
modelos tecnolgicos utilizados para comprender los rudimentos de la programacin
Se basan en la utilizacin de diversos smbolos para representar operaciones especficas. Se les llama
diagramas de flujo porque los smbolos utilizados se conectan por medio de flechas para indicar la
secuencia de operacin. La simbologa utilizada para la elaboracin de diagramas de flujo es nica y
debe ajustarse a un patrn definido previamente.
SIMBOLOS PRINCIPALES
Indica el sentido y trayectoria del proceso de informacin o tarea.
Representa un evento, proceso u operacin. Es el smbolo ms
comnmente utilizado.

Se utiliza para representar una condicin. Normalmente el flujo de

informacin entra por arriba y sale por un lado si la condicin se cumple o
sale por el lado opuesto si la condicin no se cumple. Lo anterior hace que
a partir de ste el proceso tenga dos caminos posibles.

Representa un punto de conexin entre procesos. Se utiliza cuando es

necesario dividir un diagrama de flujo en varias partes, por ejemplo por
razones de espacio o simplicidad. La mayora de las veces se utilizan
nmeros dentro de los crculos para poder distinguirlos.
Permite indicar el inicio o el final del diagrama. Debe existir un solo inicio
y un solo final.

Simbolo de pantalla utilizado para mostrar mensajes o resultados de las

operaciones.
Simbolo utilizado para la captura de datos por el teclado.

Serie de consulta LONGO

Apuntes de Microsoft Excel - 25 -

EJERCICIO UNICO: Leer 15 nmeros por teclado, sumar en la variable Par los
nmeros pares y en la variable Imp los nmeros impares.

inicio

par = 0, imp = 0
i = 1, num = 0

Leer num

(-1) ^ num = -1

no
par = par + num

no
i = i +1

i = 15

si
Pares; par
Impares; imp

fin

si

imp = imp + num

Serie de consulta LONGO

Apuntes de Microsoft Excel - 26 -

MACROS
Excel es un programa que tiene un gran potencial, pero la mayora de la gente lo maneja sin la ventaja
de las macros. Excel cuenta con un lenguaje muy poderoso llamado Visual Basic, y permite hacer o
resolver los problemas de una manera mas fcil, solo se debe aprender a programarlo. Visual Basic es
una herramienta sencilla de aprender. Sin embargo para la programacin en Visual Basic es necesario
tener cierta creatividad, cada persona puede crear estructuras diferentes pero que trabajen igual.
Qu es una macro ?
Una Macro son una serie de pasos que se almacenan y se pueden activar con alguna combinacin de
teclas o con un botn. Por ejemplo, alomejor usted todos los das necesita hacer una planilla con las
carreras que ofrece la universidad de oriente, por lo tanto para no repetir todos los pasos involucrados,
estos se pueden almacenar en una macro y posteriormente ejecutarla las veces que el usuario lo desee.
Cmo ejecutar una macro?
Para poder ejecutar una macro, se debe hacer clic en el men Vista, tal como se muestra en la siguiente
figura

Luego se debe hacer clic en el botn Macros, tal como se puede apreciar en la siguiente figura

Serie de consulta LONGO

Apuntes de Microsoft Excel - 27 -

En ese instante aparecer la siguiente ventana, donde se deber hacer clic en el nombre de la macro que
desee correr y luego se debe hacer clic en el botn ejecutar

Esimportanterecalcarqueestaventanaestvacayaqueannosehadiseado
ningunamacro.

Cmo se disea una macro?

Para poder disear (escribir) una macro se debe ejecutar los siguientes pasos

Hacer clic con el botn derecho en la

pestaa Hoja1 o en la hoja donde se
desea disear la macro. Tal como se
aprecia en la imagen de la derecha.
Al desplegarse el men contextual se
debe hacer clic en la opcin Ver cdigo.
Tal como se ve en la figura de abajo.

Luego aparecer una ventana en blanco, a

la cual llamaremos Editor de Visual
Basic. Es ah donde se disear la macro.
Tal como se observa en la figura de la
derecha.

Serie de consulta LONGO

Apuntes de Microsoft Excel - 28 -

EJERCICIO 1: Disear una macro donde se puedan apreciar todas las carreras que
ofrece la Universidad de Oriente.

Activar el Editor de Visual Basic

Escribir el cdigo
Sub Universidad()
Range("a1").Select
ActiveCell = "CARRERAS"
Range("a2").Select
ActiveCell = "Ing. Industrial"
Range("a3").Select
ActiveCell = "Ing. Computacin"
Range("a4").Select
ActiveCell = "Ing. Civil"
Range("a5").Select
ActiveCell = "Ing. Qumica"
End Sub
Minimice la venta del Editor de Visual Basic. Esto hace que regresemos a la hoja de Excel
Haga clic en el Men Vista y luego clic en el botn Macro, deber aparecer la siguiente ventana

Haga clic en Hoja1.Universidad (color azul) y luego clic en Ejecutar

Serie de consulta LONGO

Apuntes de Microsoft Excel - 29 -

El resultado deber ser el siguiente

NOTAIMPORTANTE:TodoelcdigodeVisualBasicsedebeescribirnicay
exclusivamenteenminscula,luegoalpresionarenterlaprimeraletradecada
palabrasedebercambiarautomticamenteamayscula.Siestoocurre
entonceselcdigoestbienescrito,casocontrariodebercorregirloudmismo.
QUE HACER EN CASO DE UN ERROR ?
Es muy probable que al disear una macro cometamos errores de sintaxis, es lgico que esto suceda ya
que el cdigo debe ser escrito en ingles. Al momento de correr una macro con errores, puede aparecer
la siguiente ventana

Para solucionarlo se debe cumplir los siguientes pasos:

Hacer clic en Aceptar, y el puntero (en la mayora de la ocasiones) sombrea la palabra mal escrita
(no se emocione, que eso es solo algunas veces). Luego se debe corregir el error, en este caso
observe que el programador ha escrito rango en lugar de range (es por ello que toda la palabra
permanece en minscula).

Serie de consulta LONGO

Apuntes de Microsoft Excel - 30 -

Una vez corregido el error, se debe OBLIGATORIAMENTE hacer clic en el botn Restablecer,
tal como lo muestra la siguiente figura

Por ltimo, minimice la ventana del Editor de Visual Basic y vuelva a ejecutar la Macro.

EJERCICIO 2: Modifique la macro anterior para que tenga la siguiente apariencia.

CuandoseasignaaActiveCelluntexto,stedebeirentreComillasdobles;sin
embargocuandoasignamosunnmero,stedebeirsincomillas.Paraasignaruna
fechaaunacelda,sedebehacerdelasiguientemaneraActiveCell=#24/05/2010#

Serie de consulta LONGO

Apuntes de Microsoft Excel - 31 -

EJERCICIO 3: Modifique la macro anterior para que tenga la siguiente apariencia.

ESTRUCTURAS BASICAS DE PROGRAMACION EN VISUAL BASIC

SENTENCIAS DE CONTROL
IF <condicin> THEN
Bloque de instrucciones
END IF

EJEMPLO
IF (nota >=5) then
Aprobado=Aprobado + 1
END IF

IF <condicin> THEN
Bloque de instrucciones +
ELSE
Bloque de instrucciones END IF

IF (nota >=5) then

Msgbox Usted esta aprobado
ELSE
Msgbox Usted est reprobado
END IF

SELECT CASE <Expresin-Prueba>

CASE prueba1
Bloque1
CASE prueba2
Bloque2
CASE ELSE
Bloque3
END SELECT

Dim R As Integer
Range("B1").Select
R = ActiveCell.FormulaR1C1
Select Case R
Case 1
MsgBox "el valor es uno"
Case 2 To 5
MsgBox "el valor est entre 2 y 5"
Case Else
MsgBox "el valor es desconocido"
End Select

Serie de consulta LONGO

Apuntes de Microsoft Excel - 32 -

BUCLES
EJEMPLO
Dim
subtotal
As
Integer
FOR <Contador=inicio> TO <final> [STEP
subtotal = 0
<incremento> ]
For i = 1 To 10
Bloque de instrucciones
subtotal = subtotal + i * 5
NEXT
Next
MsgBox subtotal
Rem Muestra el valor de 275
Dim vueltas As Integer
DO WHILE <Condicin>
Dim contador As Integer
Bloque de instrucciones
contador = 20
LOOP
vueltas = 0
Do While (contador >= 0)
vueltas = vueltas + 1
contador = contador - 2
Loop
MsgBox vueltas
Rem Se muestra el valor de 11
Dim vueltas As Integer
DO UNTIL <Condicin>
Dim contador As Integer
Bloque de instrucciones
contador = 20
LOOP
vueltas = 0
Do Until (contador = 0)
vueltas = vueltas + 1
contador = contador - 2
Loop
MsgBox vueltas
Rem Se muestra el valor de 10

Serie de consulta LONGO

Apuntes de Microsoft Excel - 33 -

CODIGOS COMUNES
SENTENCIA

OBJETIVO

Range("A1").Select

Trasladarse a una celda en forma absoluta

ActiveCell="Texto"

Escribir un texto en una celda

ActiveCell=25

Escribir un valor numrico en una celda

ActiveCell = #27/10/2010#

Escribir una fecha en una celda

Selection.Font.Bold = True

Letra Negrita

Selection.Font.Italic = True

Letra Cursiva

Selection.Font.Underline = xlUnderlineStyleSingle Letra Subrayada

Selection.Copy

Copiar

Selection.Cut

Cortar

ActiveSheet.Paste

Pegar

Selection.EntireRow.Insert

Insertar una fila

Selection.EntireRow.Delete

Eliminar una fila

Selection.EntireColumn.Insert

Insertar una columna

Selection.EntireColumn.Delete

Eliminar una columna

ActiveCell.Offset(-1, 3).Select

Desplazarse en nfilas, ncolumnas en forma

relativa

Selection.End(xlDown).Select

Desplaza a la ultima celda (hacia abajo)

Selection.End(xlUp).Select

Desplaza a la ultima celda (hacia arriba)

Selection.End(xlToRight).Select

Desplaza a la ultima celda (hacia la derecha)

Selection.End(xlToLeft).Select

Desplaza a la ultima celda (hacia la izquierda)

Selection.Font.Color = -16711681

Poner el color del texto en Amarillo

Selection.Font.Color = -16776961

Poner el color del texto en Rojo

Selection.Font.Color = -4165632

Poner el color del texto en Azul

Selection.Interior.Color = 65535

Colocar el fondo de la celda en color Amarillo

Selection.Interior.Color = 255

Colocar el fondo de la celda en color Rojo

Selection.Interior.Color = 12611584

Colocar el fondo de la celda en color Azul

Serie de consulta LONGO

Apuntes de Microsoft Excel - 34 -

EJERCICIO 4: Poner en color azul las notas de los alumnos aprobados.

Escribir en la hoja de calculo los siguientes datos

Abrir el Editor de Visual Basic y escribir el siguiente cdigo

Minimice el Editor de Visual Basic y ejecute la macro Colorear, el resultado debe ser como la
imagen de de la pagina siguiente

Serie de consulta LONGO

Apuntes de Microsoft Excel - 35 -

INSTRUCCIN

EXPLICACIN

Sub Colorear( )

Se asigna un nombre a la macro

Range("c2").Select

El puntero se ubica en forma absoluta en

la celda C2

For i = 1 To 7

Se abre un ciclo (bucle) de 7 iteraciones

If ActiveCell >= 5 Then

Se abre una pregunta. Si la celda activa

es mayor igual a cinco, entonces

Selection.Font.color =
-4165632

El contenido de la ceda se pone en color

Azul

End If

Se cierra la pregunta

ActiveCell.Offset(1,
0).Select

El puntero
relativa

Next

Se cierra el ciclo

End Sub

Se finaliza la macro

baja

una

celda

en

forma

EJERCICIO 5 (para el hogar): Disee una nueva macro tomando como base los
datos del ejercicio anterior , de tal manera que el fondo de las celdas que contengan
la letra F (femenino) se ponga en amarillo. Luego en la celda F1 coloque la cantidad
de Hombres y en F2 la cantidad de mujeres.

Serie de consulta LONGO

Apuntes de Microsoft Excel - 36 -

EJERCICIO 6: Resaltar el fondo de las celdas en color azul para los valores positivos
y de color rojo para los valores negativos. Para ello utilice un doble bucle

Escribir los valores segn la siguiente planilla

Activar el Editor de Visual Basic y escribir el siguiente cdigo

Serie de consulta LONGO

Apuntes de Microsoft Excel - 37 -

El resultado debe ser como la siguiente imagen

INSTRUCCIN

EXPLICACIN

Range("B2").Select

Seleccionar en forma absoluta la celda

B2

Do
While
Empty

ActiveCell

<> Hacer un bucle mientras la celda activa

sea diferente de vaco

Do
While
Empty

ActiveCell

<> Hacer un bucle anidado mientras

celda activa sea diferente de vaco

If ActiveCell >= 0 Then

Selection.Interior.Color
12611584
Else
Selection.Interior.Color
255

la

Si la celda activa es mayor igual a

cero, entonces
= Resaltar el interior de la celda con el
color azul
De lo contrario
= Resaltar el interior de la celda con el
color rojo

End If

Fin de la pregunta

ActiveCell.Offset(1,
0).Select

Seleccin relativa, 1 fila hacia abajo

y 0 columnas a la derecha

Loop

Repetir bucle interno

ActiveCell.Offset(-1,
1).Select

Seleccin relativa, 1 fila hacia arriba

y 1 columna a la derecha

Selection.End(xlUp).Select

Seleccionar la ltima celda con datos

del bloque, en direccin hacia arriba

Loop

Repetir bucle externo

Serie de consulta LONGO

EJERCICIO 7: Segn la edad,

adolescente, joven, adulto.

Apuntes de Microsoft Excel - 38 -

colocarle a cada persona el estatus de nio,

Escribir los datos, segn la siguiente planilla

Abrir el Editor de Visual Basic

Asignarle a la macro el nombre de Sub StatusEdad ( )
Disee la macro (USANDO SELECT CASE) para que coloque el estatus correspondiente, segn
las siguiente condiciones:
(De 0 a 12 aos => Nio) (de 13 a 17 => Adolescente) (de 18 a 25 => Joven) (de 26 a 35 =>
Adulto) ( En adelante => Mayor). El resultado debe ser igual a la siguiente imagen

Serie de consulta LONGO

La solucin al ejercicio es la siguiente

Apuntes de Microsoft Excel - 39 -

Serie de consulta LONGO

Apuntes de Microsoft Excel - 40 -

MANEJO DE VARIABLES
Las variables son posiciones o lugares en la memoria del computador en donde los programas pueden
almacenar informacin dinmica, es decir, cuyo contenido puede variar durante la ejecucin de los
mismos. En visual basic es recomendable declarar las variables antes de usarlas, ya que, esto nos
permite controlar eficientemente los tipos de datos y su manejo. La forma de declarar las variables es la
siguiente:
Dim nombre_variable As tipo
TIPO DE VARIABLE
Boolean *

VALOR
Solo admite 2 valores TRUE o FALSE

Byte *

Admite valores entre 0 y 255

Integer *

Admite valores entre -32.768 y 32.767

Long

Admite valores entre -2.147.483.648 y 2.147.483.647

Single

Admite valores decimales con precisin simple (4 bytes)

Double *

Admite valores decimales con precisin doble (8 bytes)

Currency

Vlido para valores de tipo moneda

String *

Utilizado para declarar variables de tipo cadena de caracteres

Date *

Vlido para datos de tipo fecha (se puede hacer operaciones)

Variant

Tipo genrico

(*) Son los tipos mas utilizados

EJERCICIO 8: Repetir el ejercicio numero 7, pero en lugar de usar SELECT CASE,

utilice la sentencia IF

Silodeseapuededescargarlasolucindelejercicio8desdelapaginadelautor
www.josephlojan.comelarchivosellamaTitis.xls

Serie de consulta LONGO

Apuntes de Microsoft Excel - 41 -

EJERCICIO 9: Generar una macro que desarrolle una tabla de conversiones, que
tome los N primeros valores enteros mltiplos de 5, en grados centgrados
(partiendo de 0 C), y los traduzca a grados fahrenheit o grados Kelvin, segn la
preferencia del usuario.
F = 9/5 C + 32

K = C + 273

Llenar en la planilla solamente las celdas A1, A2, B4, C4, segn la siguiente figura:

Abrir el Editor de Visual Basic y escribir el siguiente cdigo

Serie de consulta LONGO

Apuntes de Microsoft Excel - 42 -

Un ejemplo de la ejecucin de la macro, es la siguiente:

EJERCICIO 10: Realizar una macro que cuente el nmero de empleados que se
encuentren en un rango de sueldo. Para ello la macro debe pedir el sexo del
empleado, adems el lmite inferior y el lmite superior del sueldo.

Crear una planilla como la siguiente:

Serie de consulta LONGO

Abrir el Editor de Visual Basic

Escriba el cdigo necesario para que se cumpla el objetivo solicitado
Al ejecutar la macro se deber observar las siguientes pantallas:

La solucin es la siguiente:

Apuntes de Microsoft Excel - 43 -

Serie de consulta LONGO

Apuntes de Microsoft Excel - 44 -

FUNCIONES DE VISUAL BASIC

Visual Basic tambin trae incorporadas funciones que son de gran utilidad.
FUNCION
Sqr(numero)

SIRVE PARA
Calcular la raz de un numero

Rnd( )

Generar un numero aleatorio entre 0 y 1

Date

Devolver la fecha actual

Year(Fecha)

Devolver el ao de una fecha dada

Month(Fecha)

Devolver el numero de mes de una fecha dada

Int(Numero)

Devolver solamente la parte entera de un numero

Ucase(Texto)

Convertir a mayscula un texto

EJERCICIO 11: Calcular la hipotenusa de una serie de tringulos rectngulo

Crear una planilla como la siguiente:

Serie de consulta LONGO

Abrir el Editor de Visual Basic

Escribir el cdigo segn la siguiente imagen

Ejecute la macro. El resultado debe ser el siguiente

Apuntes de Microsoft Excel - 45 -

Serie de consulta LONGO

EJERCICIO 12: Crear una lista de 10 numero aleatorios

Abrir el Editor de Visual Basic

Escribir el cdigo segn la siguiente imagen

Ejecute la macro. El resultado debe ser similar al siguiente

Apuntes de Microsoft Excel - 46 -

Serie de consulta LONGO

Apuntes de Microsoft Excel - 47 -

EJERCICIOS PROPUESTOS

EJERCICIO 13: Se tiene una lista de vehculos: Taxi y Particular. Se debe colocar el
fondo de la celda con color amarillo solamente a los taxis que tengan ms de 10
aos.

Crear una planilla como la siguiente

Disee la macro correspondiente, el resultado debe ser parecido a la siguiente imagen

Tratedehacerporsuspropiosmedioselejercicio#13.Sideseaverunasolucin
propuesta,puededescargarladesdelapaginadelautorwww.josephlojan.comel
archivosellamaTaxi.xls

Serie de consulta LONGO

Apuntes de Microsoft Excel - 48 -

EJERCICIO 14: Crear un diccionario Ingles-Espaol. Dada una palabra en Ingls, la

macro me debe indicar su equivalente en espaol. Adems la macro debe colocar
un * (asterisco) a la palabra consultada y ponerla en fondo amarillo.

Crear una planilla como la siguiente

Disee la macro correspondiente, el resultado debe ser parecido a las siguientes imgenes

Tratedehacerporsuspropiosmedioselejercicio#14.Sideseaverunasolucin
propuesta,puededescargarladesdelapaginadelautorwww.josephlojan.comel
archivosellamaDiccionario.xls

Serie de consulta LONGO

Apuntes de Microsoft Excel - 49 -

COMO DESCARGAR ARCHIVOS DESDE LA PAGINA ?

Ingrese a la direccin www.josephlojan.com aparecer la siguiente pantalla

En Descarga Interactiva escriba el nombre del archivo que desea descargar, por ejemplo Titis.xls
Recuerde siempre respetar las minsculas y maysculas y sin dejar espacios en blanco
Luego haga clic en el botn

Aparecer la siguiente ventana

Serie de consulta LONGO

Apuntes de Microsoft Excel - 50 -

Se debe hacer clic en Guardar y aparecer la siguiente pantalla

Seleccione la carpeta donde desea guardar el archivo (Generalmente Mis Documentos) y luego
haga clic en Guardar
Luego dirjase a Mis Documentos y haga doble clic en el archivo correspondiente
NOTA IMPORTANTE. Al abrir el archivo, la macro no se va a ejecutar. Primero deber hacer
clic en Opciones, tal como lo muestra la siguiente figura

Aparecer la siguiente pantalla

Haga clic en Habilitar este contenido y luego en aceptar

Ahora ya puede ejecutar la macro. Sin embargo si el botn de opciones no aparece, entonces cierre
el archivo y vuelva a abrirlo.