Hola! renenrique.

Te he dejado en el enlace http://img165.imageshack.us/img165/5529/demo488tq0.jpg dos alternativas en respuesta a tu consulta:



1º) En el rango B2:C22 tienes una tabla donde para el caso de 20 artículos con precio del último 500, te muestra el valor de cada uno de ellos.

El rango C3:C21 tiene aplicado la fórmula que te muestro, mientras que la celda D3 tiene la fórmula que suma todos los valores parciales.



2º) En F3:G5 tienes la segunda alternativa.

Ingresando valores en G3:G4 obtienes el valor final a partir de la fórmula que se encuentra en la celda G5.





Saludos

...

Pues la verdad nose, pero mi maestro me dijo que para poder resolver este tipo de operaciones tienes q tener instalado el complemento de excel q es el SOLVER, no desesitas descargarlo, el excel ya lo tiene unicamente instalalo.



Si tienes el office 2007.



Excel ----> ventana de windows (parte superior Izquierda)----> opciones de Excel ------> Complementos.



En la pestaña Complementos busca el SOLVER. después le pones en IR.



Y listo espera a que lo instale. Y ya puedes hacer cada vez q ingreses un valor, la cantidad total cambia.



Lo malo es q debes saber usarlo. Yo casi no lo sé usar.

Apreciado amigo, he preparado una Macro en Excel que hará el cálculo que planteas.



En la Celda A1 debes ingresar el precio original del artículo y en la Celda A2 el número de artículos a vender. Entonces, al correr la Macro hará un número de iteraciones igual al valor introducido en A2, y en cada iteración restará el 10% del valor de A1, y el valor acumulado total, se verá en la Celda C1 al finalizar la ejecución de la Macro. No hagas caso de lo que aparece en las celdas A3, A4 y A5, ya que son cálculos intermedios.



En el siguiente link, puedes ver un ejemplo para un artículo que vale 200.000,00 y la venta es de 5 artículos (por favor aumenta el zoom):



http://img180.imageshack.us/img180/9946/valorfinaldeunarticulopt9.jpg



Las instrucciones de la Macro son las siguientes:



Sub Macro2()

'

' Macro2 Macro

' prueba

'



'

Range("A1").Select

Selection.Copy

Range("A4").Select

ActiveSheet.Paste

Application.CutCopyMode = False

Range("A1").Select

Selection.Copy

Range("C1").Select

ActiveSheet.Paste

Application.CutCopyMode = False

Range("A2").Select

Selection.Copy

Range("A3").Select

ActiveSheet.Paste

Application.CutCopyMode = False

Range("A3").Select



Do Until ActiveCell <= 0

Range("A5").Select

ActiveCell.FormulaR1C1 = "=R[-1]C-0.1*R[-1]C"

Selection.Copy

Range("A4").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("C2").Select

ActiveCell.FormulaR1C1 = "=R[2]C[-2]+R[-1]C"

Range("C2").Select

Selection.Copy

Range("C1").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("B3").Select

ActiveCell.FormulaR1C1 = "=RC[-1]-1"

Selection.Copy

Range("A3").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Loop

Range("P1").Select

ActiveCell.FormulaR1C1 = "=RC[-13]-R[3]C[-15]"

Range("P1").Select

Selection.Copy

Range("C1").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("C1").Select

With Selection.Font

.Color = -4165632

.TintAndShade = 0

End With

Range("D1").Select

ActiveCell.FormulaR1C1 = " es el precio a pagar por"

Range("A2").Select

Selection.Copy

Range("F1").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("G1").Select

Application.CutCopyMode = False

ActiveCell.FormulaR1C1 = "artículos"

Range("G2").Select

End Sub



Espero sepas trabajar con Macros, ya que puedes cargar las instrucciones en Excel, seleccionándolas aquí en esta respuesta y luego pegándolas en el Editor Visual Basic de Excel.



En el siguiente link, te anexo el archivo hecho en Excel:



http://www.sendspace.com/file/h5na0p



Haces clik donde dice Download Link: Valor final de un artículo.XLS



Si al abrir el archivo, Excel te da el aviso de que las Macros están inhabilitadas por seguridad, entonces debes proceder a habilitar las Macros.



Al abrir el archivo, ingresas en A1 el precio original del artículo y en A2 el numero de artículos a vender. Luego le das a Ctrl+h a fin de que se ejecute la Macro. Recuerda que el precio final de los artículos saldrá en color azul en la Celda C1.



Si no sale bien algo, este es mi correo:



robertrosa57@yahoo.es



Espero haber podido ayudarte. Saludos!