Macros ejercicios

MACROS EN EXCEL

Ejercicios Simples de Macros
Ej1: Ingrese al excel, y escriba 2 columnas una de nombre, ex1, ex2 y ex3. Luego otra de suma, producto, promedio y por ultimo de condición Aprobadoo desaprobado.
En excel dirigase al menú ver barra de herramientas visual basic.
Luego en dicha barra haga clic en el icono llamado barra de controles (martillo y llave).
Inserte un controlbutton, luego haga doble clic para ingresar código:
For i = 2 To 10
Cells(i, 3).Value = Cells(i, 1) + Cells(i, 2)
Cells(i, 4).Value = Cells(i, 1) * Cells(i, 2)
Next
Ej2: Si deseo colocar lapalabra hola a todo un rango, el código será:
Range(Cells(1, 1), Cells(10, 2)) = "Hola"
Pero si esta en otra hoja, sera:
Worksheets("Hoja1").Range(Cells(1, 1), Cells(10, 2)) = "Hola"
A continuaciónse muestra un código, donde se jala 3 notas por alumno, para 4 alumnos, donde se saca el promedio.
For i = 2 To 6
For j = 2 To 4
suma = suma + Cells(i, j).Value
Next
Cells(i,5).Value = suma / 3
If Cells(i, 5).Value >= 10.5 Then
Cells(i, 6).Value = "Aprobado"
Else
Cells(i, 6).Value = "Desaprobado"
End If
suma = 0
Next

Notas:- Para poder llamar a una macro, que hemos creado en un modulo, jalamos un botón de
commando en excel, y escribir el código del nombre de la macro ej: macrito
- Si hemos creado un formulario, yqueremos llamarlo por medio de un botón de
comando desde excel, dentro del botón, ingresamos el siguiente código:
Load UserForm1
UserForm1.Show
Ejer3 El ejercicio consiste en insertar unformulario (en excel: menú herramientas macroseditor de visual basic. En visual basic, ir al menú insertar y elegir la opcion UserForm. Ingresar datos: Nombres, dias trabajados, pago por hora ybono.
Ingresar Registros Infinitamente
Private Sub CommandButton1_Click()
Static fila As Byte
fila = fila + 1
TextBox1.SetFocus
Cells(fila, 2) = TextBox1
Cells(fila, 3) = TextBox2
Cells(fila, 4)...