Curso Macros
Enviado por lauritagomez • 27 de Abril de 2014 • 443 Palabras (2 Páginas) • 165 Visitas
MACROS DE TECLADO
Para agregar programador (Developer)
• FILE
• Opciones
• Customize ribbon
• All command
• Developer
TIP: Para ver el código o regresar al archivo: Alt+F11
Vocabulario Macros:
Se llaman instrucciones “Range, ActiveCell…”
EJERCICIO 1 DÍA 2
1. Guardar cómo
2. Copiar todos los productos a la hoja 2 del libro 2
3. Regresar al archivo original de Excel
4. Insertar columna después de productos con título “precio”
5. Seleccionar y enviar a imprimir selección
6. Sacar el total de Q2, Q3 y Q4
Para ejecutar Macro:
Ctrl+Shift(Letra que se guardó)
Ó
Ir a Macros y seleccionar la Macro que deseo ejecutar
El inicio y fin de la macro es:
Sub Macro2()
End Sub
Tip: Se puede cambiar el nombre de la Macro siempre y cuando no deje espacios
Asignar Valor a una Celda: Si el contenido es alfanumérico se pone entre comillas si solo es un valor se pone directamente.
Variable: Algo que puede tomar cada ocasión un valor diferente, puede ser una letra o una palabra
ActiveCell = “Precio” Esto es un título o sea texto
Range (“B1”) .Select
tit = “Precio” También te pone el título y lo guarda en la memoria no se refleja
t = 5 t es la variable y el t = 5 no se refleja en el Excel sino que guarda en la memoria y lo ejecuta. Por ejemplo si fuera t = t + 1 cada vez va a sumar uno al valor de t
tit = “Precio”
ActiveCell = tit el valor lo reflejara en la celda activa
ActiveCell = “Precio”
a = 5
g = 10
p = a + g La asignación es de derecha a izquierda, es decir la instrucción va después
MACROS
Sub Macro5()
'macro para capturar
nom = InputBox("dame el nombre del alumno ")
Range("B15").Select
ActiveCell = nom
End Sub
DETECCIÓN DE PROBLEMA PASO A PASO (F8)
Para encontrar errores cuando no nos corre una macro dar F8 o depuración
Marcará con amarillo si es error
Dar stop
Marcará con amarillo donde está el error de sintaxis si das otra vez F8 y se ejecuta y se regresa a la macro y marca con amarillo donde está el error
MACRO CON REFERENCIAS RELATIVAS
Seleccionamos “Use Relative References” botón debajo de Macro, después damos click en Macro y este es el código que genera
ActiveCell.Offset(3, -2).Range("A1").Select
ActiveCell.FormulaR1C1 = "1"
Ejemplo:
A B C D E
1 X1
X8
X2
X9
2 X6
3 X4
...