Guía de Ejercicios Programas Secuenciales en VBA
Enviado por Paolo Caviedes Saavedra • 5 de Octubre de 2022 • Apuntes • 475 Palabras (2 Páginas) • 32 Visitas
[pic 1]
Guía de Ejercicios
Programas Secuenciales en VBA
- El siguiente programa pide el nombre a la persona y le saluda de vuelta. Modifíquelo para que le pida el año de nacimiento e indique cuántos años cumple el 2022.
Option Explicit Sub saludo() Dim nombre As String nombre = InputBox("¿Como te llamas?") MsgBox ("Hola, " & nombre) End Sub |
- El siguiente programa calcula el IMC de una persona correctamente, pero está desordenado. Ordene el código a continuación para que cumpla con lo solicitado.
Sub calcular_imc() altura = Cells(1, 2).Value Cells(2, 2).Interior.ColorIndex = 37 Dim peso As Integer resultado = peso / (altura * altura) Dim altura As Double peso = Cells(1, 1).Value Dim resultado As Double Cells(2, 2).Value = resultado End Sub Option Explicit |
- Necesitamos un programa que calcule y muestre el área de un triángulo del que conocemos su base y su altura. Por ejemplo, si la base es 10 y la altura 100, la salida debiese ser: 500. Complete el código a continuación para que lea desde una celda o pida usando un InputBox los datos necesarios, y para que despliegue los resultados en otra celda o bien los muestre usando un MsgBox:
Option Explicit Sub calcular_area() Dim base As Double Dim altura As Double Dim area As ___ base = ___ altura = ___ area = (___ * ___) / 2 ___ End Sub |
- Escriba un programa que pida el valor de los dos lados de un rectángulo y muestre el valor de su perímetro y el de su área. Por ejemplo, si se ingresa 1 y 5, el perímetro será 12.0, y el área 5.0.
- Implemente un convertidor de grados Celsius a Fahrenheit. Para ello, debe multiplicar los grados Celsius por 9/5 y sumar 32.
- Grabe una macro que le permita lograr una tabla similar a esta:
[pic 2]
Luego, haga una subrutina que pida un número entre 0 y 100, y escríbalo en la celda D3. Ese será el porcentaje de descuento, que deberá usar para calcular los precios con descuento a escribir en el rango D6:F6. Recuerde que el valor con descuento es el precio original, multiplicado por la resta entre 1 y el descuento dividido en 100.
- Tres amigos compran y pagan de su bolsillo distintas cosas para juntarse a ver un partido. Después, quieren repartirse los gastos y para ello necesitan de un programa que les calcule la cuota individual y cuánto deben. Suponga que los amigos escribirán lo aportado por cada quien en el rango B2:B4, y su programa debe escribir en la celda C1 el valor de la cuota, y en el rango C2:C4 lo que debe pagar cada persona.
- Siempre que me junto con mis amigos y encargamos sushi tenemos el mismo problema. Pedimos una determinada cantidad de rolls y después no sabemos cuántas piezas le tocan a cada uno. Más aún, dependiendo de dónde encargamos, los rolls tienen distinta cantidad de piezas.
...