Loop con condicional para un rango de valores
Publicado por Pedro (3 intervenciones) el 27/08/2019 17:12:32
Buenos días,
Deseo generar una nueva columna de datos(6) modificando los datos de la columna 5, condicionando los mismos a que si el valor en la columna 4= a un valor del rango G2:G734, el dato en la columna 6 es igual al de la columna 5 menos 10; sino el dato en la columna 6 es igual al de la columna 5. Para esto generé el siguiente macro que les adjunto, el cual funciona para el primer valor que cumple la condición y luego comienza a tomar los valores de la columna 5.
Entiendo que hay un problema con el if, espero su ayuda. Gracias!
Deseo generar una nueva columna de datos(6) modificando los datos de la columna 5, condicionando los mismos a que si el valor en la columna 4= a un valor del rango G2:G734, el dato en la columna 6 es igual al de la columna 5 menos 10; sino el dato en la columna 6 es igual al de la columna 5. Para esto generé el siguiente macro que les adjunto, el cual funciona para el primer valor que cumple la condición y luego comienza a tomar los valores de la columna 5.
Entiendo que hay un problema con el if, espero su ayuda. Gracias!
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub Ac_mod()
fila = 2
Do While (Cells(fila, 5) <> 0)
If (Cells(fila, 4)) <> Range("G2,G734").Value Then
Cells(fila, 6) = Cells(fila, 5).Value
End If
If (Cells(fila, 4)) = Range("G2,G734").Value Then
Cells(fila, 6) = Cells(fila, 5).Value - 10
End If
fila = fila + 1
Loop
End Sub
Valora esta pregunta


0