Macro en excel 2007
Hola expertos, necesito que me expliquen como elaborar una macro, lo que deseo es que me remplace un nombre en la columna E11, ejemplo.
Tengo un nombre en la columna E11 Juan Perez, pero cuando dijiste 0.00 en la columna H11: I11, me ponga ANULADO, eso esto. Espero me ayuden.
Saludos
Tengo un nombre en la columna E11 Juan Perez, pero cuando dijiste 0.00 en la columna H11: I11, me ponga ANULADO, eso esto. Espero me ayuden.
Saludos
1 respuesta
Respuesta de d2enri
1
0.00 en las 2 celdas H11:¿I11? O en cualquiera de ellas
Y solo para esas celdas ¿o quieres correr la Columna
Ya me cuentas
Y solo para esas celdas ¿o quieres correr la Columna
Ya me cuentas
Si quiero que la palabra Anulado aparezca en la columna "E" a partir de la Fila 11, siempre que las columnas H11:I11, tengan "0.00"
Prueba este código
Sub Anulado()
'creado por d2enri 04-05-2011
row4 = 11
row5 = 11
Do While Trim(Range("h" & row4).Value) <> Empty
If Range("h" & row4).Value = "0" And Range("i" & row5).Value = "0" Then
Range("h" & row4).Select
ActiveCell.Offset(0, -3).Select
ActiveCell.FormulaR1C1 = "Anulado"
End If
row4 = row4 + 1
row5 = row5 + 1
Loop
MsgBox "Proceso finalizado"
End Sub
Si te vale así y quieres se podría activar al cambiar el valor de celda con Change
Ya me cuentas
Sub Anulado()
'creado por d2enri 04-05-2011
row4 = 11
row5 = 11
Do While Trim(Range("h" & row4).Value) <> Empty
If Range("h" & row4).Value = "0" And Range("i" & row5).Value = "0" Then
Range("h" & row4).Select
ActiveCell.Offset(0, -3).Select
ActiveCell.FormulaR1C1 = "Anulado"
End If
row4 = row4 + 1
row5 = row5 + 1
Loop
MsgBox "Proceso finalizado"
End Sub
Si te vale así y quieres se podría activar al cambiar el valor de celda con Change
Ya me cuentas
