Excel - separar billetes

   
Vista:

separar billetes

Publicado por martin (5 intervenciones) el 06/11/2013 16:46:48
hola genteee como vaa, tengo un problemita que me gustaria resolver.T
engo el numero 465, lo que me gustaria resolver es conseguir una formula, o varias, que me digan cuantos billetes de cada valor necesito para completar la cifra, en este caso seria 4 de 100, 1 de 50 1 de 10 y 1 de 5. espero haberme explicado bien.
gracias desde
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de JuanC

separar billetes

Publicado por JuanC juanc2942@gmail.com (1053 intervenciones) el 07/11/2013 01:02:33
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Sub prueba()
Dim n%
Dim a%, b%, c%, r$
n = 465
If n >= 100 Then
   a = Fix(n / 100)
   n = n - (a * 100)
End If
If n >= 50 Then
   b = Fix(n / 50)
   n = n - (b * 50)
End If
If n >= 10 Then
   c = Fix(n / 10)
   n = n - (c * 10)
End If
 
r = a & "x100 " & b & "x50 " & c & "x10 " & n & "x1"
MsgBox r
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

separar billetes

Publicado por Armando Montes (240 intervenciones) el 08/11/2013 04:30:04
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar