cepuentes respondió:
Prueba con esta macro. Sub aumenta() On Error Resume Next k = InputBox("Ingrese la fila", "Macro para descender por cledas de columna", 2) For i = k To 999999 If Cells(i, 3) = "" Then Exit Sub End If Cells(i, 3) = Cells(i, 3) * 1.1 Next i MsgBox...