Ver Mensaje Individual
  #1 (permalink)  
Antiguo 20/04/2009, 15:12
Slayer_sephiroth
 
Fecha de Ingreso: enero-2008
Mensajes: 111
Antigüedad: 16 años, 4 meses
Puntos: 0
Duda resuelta

Hola,vereis,tengo una columna con precios y tengo que restarle un porcentaje a cada precio y luego dividlo entre un numero.He intentado hacerlo pero no me ha salido nada.¿me podeis ayudar?
Un saludo

Edito:
He recordado que tenia por ahi olvidada una macro de excel de hace años y la he modificado un poco.De todas formas os la pongo aqui por si os sirve de utilidad

La macro resta el 50% y divide entre 0,6 todas las celdas de la primera columna(1) y de la fila 39 a la 44(las letras se las salta y con celdas vacias pone un cero en ellas.
Espero que os ayude

Sub beta()
Dim f As Integer
Dim multi As Integer
multi = 0
For f = 39 To 44
If IsNumeric(Worksheets("hoja1").Cells(f, 1)) Then
multi = (Worksheets("hoja1").Cells(f, 1) - ((Worksheets("hoja1").Cells(f, 1) * 50) / 100)) / 0.6
Worksheets("hoja1").Cells(f, 1) = multi
End If
Next f

End Sub

Última edición por Slayer_sephiroth; 20/04/2009 a las 16:00