falabella

Páginas: 3 (673 palabras) Publicado: 4 de julio de 2013
Crear una macro para los siguientes problemas:
1. Ir a la celda A2 y posteriormente ir a la celda C5
Sub ejercicio1()
'1. Ir a la celda A2 y posteriormente ir a la celda C5
' usando rangeRange("A2").Select
Range("C5").Select
' usando cells
Cells(2, 1).Select
Cells(5, 3).Select
End Sub

2. Obtener el valor de la celda A5 si el valor es > 10 ir a la celda B5 y darleel valor V de lo contrario ir a la celda C5 y darle el valor de F

Sub ejercicio2()
'2. Obtener el valor de la celda A5 si el valor es > 10 ir a la celda B5 y darle el valor V de lo contrario ira la celda C5 y darle el valor de F
If Range("a5").Value > 10 Then
Range("c5").Clear
Range("B5").Select
Range("B5").Value = "V"
Else
Range("b5").ClearRange("c5").Select
Range("c5").Value = "F"
End If

End Sub

3. Asigne a la celda activa una fórmula que realice la suma de las dos celdas anteriores en la misma fila de la celdaactiva

Sub ejercicio3()
'3. Asigne a la celda activa una fórmula que realice la suma de las dos celdas anteriores en ‘la misma fila de la celda activa
'
ActiveCell.FormulaR1C1 ="=RC[-2]+RC[-1]"
End Sub


4. Asigne a la celda activa el resultado de la suma de las dos celdas anteriores en la misma fila de la celda activa

Sub ejercicio4()
'4. Asigne a la celda activa elresultado de la suma de las dos celdas anteriores en la
‘ misma fila de la celda activa
' forma 1
ActiveCell.Value = ActiveCell.Offset(0, -2).Value + ActiveCell.Offset(0, -1).Value

' forma 2
Dimval1, val2, resul As Integer
val1 = ActiveCell.Offset(0, -2).Value
val2 = ActiveCell.Offset(0, -1).Value
resul = val1 + val2
ActiveCell.Value = resul
End Sub

5. Ingrese su nombre en una celday su apellido en la celda siguiente de la misma fila, en la celda siguiente asigne el resultado de la unión del nombre y el apellido

Sub ejercicio5()
'5. Ingrese su nombre en una celda y su...
Leer documento completo

Regístrate para leer el documento completo.

Estos documentos también te pueden resultar útiles

  • Falabella
  • Falabella
  • Falabella
  • Falabella
  • Falabella
  • falabella
  • Falabella
  • Falabella

Conviértase en miembro formal de Buenas Tareas

INSCRÍBETE - ES GRATIS