 Autor
|
Tema: Dividir Numero en partes proporcionales (Leído 3,310 veces)
|
DIOrain
 Desconectado
Mensajes: 3
|
Necesito dividir un número en partes proporcionales dependiendo de un múltiplo dado por un contenido, por ejemplo:
Una caja debe contener 100 piezas. Se fabricaron 480 piezas. Necesito mandar a imprimir 4 etiquetas para cada caja y dejar el sobrante de 80 solo como registro, sin imprimir.
Básicamente quiero que una MACRO se registren estas piezas y se envien a imprimir las etiquetas necesarias dependiendo del numero de piezas registradas y la cantidad que debe de llevar la caja.
A alguien se le ocurre un código para hacer esto?
Agradeceré mucho cualquier ayuda.
Saludos
|
|
|
|
|
En línea
|
|
|
|
|
engel lex
|
operación de resto o solo trabajar numero enteros es decir maximo = 480
lote = 100
sobran = maximo mod lote
(aqui resto vale 80)
cajas = entero(maximo/lote)
(aquí cajas vale 4)
es cosa que apliques ahora eso al lenguaje que trabajes
|
|
|
|
|
En línea
|
El problema con la sociedad actualmente radica en que todos creen que tienen el derecho de tener una opinión, y que esa opinión sea validada por todos, cuando lo correcto es que todos tengan derecho a una opinión, siempre y cuando esa opinión pueda ser ignorada, cuestionada, e incluso ser sujeta a burla, particularmente cuando no tiene sentido alguno.
|
|
|
DIOrain
Desconectado
Mensajes: 3
|
Muchas gracias!
Podrías, si no es demasiado, poner un ejemplo en visual basic para excel?
Lo que pasa es que soy algo nuevo en estos menesteres...
Muchas gracias de cualquier modo por la respuesta, ya tengo una idea, ahora mi problema es la ignorancia del lenguaje.
Saludos
|
|
|
|
|
En línea
|
|
|
|
|
engel lex
|
te deje los nombres para que lo buscaras en google... no manejo VB
|
|
|
|
|
En línea
|
El problema con la sociedad actualmente radica en que todos creen que tienen el derecho de tener una opinión, y que esa opinión sea validada por todos, cuando lo correcto es que todos tengan derecho a una opinión, siempre y cuando esa opinión pueda ser ignorada, cuestionada, e incluso ser sujeta a burla, particularmente cuando no tiene sentido alguno.
|
|
|
DIOrain
Desconectado
Mensajes: 3
|
Entiendo, muchas gracias engel lex, así lo haré
Saludos
|
|
|
|
|
En línea
|
|
|
|
|
Shell Root
|
Así por simple, podrías hacer algo como esto: Linea 8: Me redondea el valor, lo hice a lo cavernicola y lo converti a string, tomo el primer valor y despúes converti a entero. Public Sub Init() Call PrintSticker(480, 100) End Sub Public Sub PrintSticker(CantMAX As Integer, CantLote As Integer) Dim CantRest As Integer Dim Box As Integer Box = CInt(Left(CStr(CantMAX / CantLote), 1)) CantRest = CantMAX Mod CantLote MsgBox "Numero de cajas: " & Box & ". Residuo: " & CantRest End Sub ' Numero de cajas: 4. Residuo: 80
Esperad los magos del VB que te den otra más optimizada. |
|
|
|
« Última modificación: 15 Abril 2015, 17:47 pm por Shell Root »
|
En línea
|
Te vendería mi talento por poder dormir tranquilo.
|
|
|
|
| Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
|
Songoku o alguien que sepa como puedo dividir un mp3 en varias partes ??
Multimedia
|
incog
|
1
|
2,653
|
26 Mayo 2004, 19:31 pm
por Songoku
|
|
|
|
Dividir la figura en 4 partes iguales.
Desafíos - Wargames
|
MA40
|
9
|
36,718
|
21 Noviembre 2011, 22:30 pm
por stevewap
|
|
|
|
Dividir video MPGE-2 en varias partes
Multimedia
|
STEP 7-200
|
3
|
5,042
|
29 Julio 2009, 21:27 pm
por Songoku
|
|
|
[RETO] Comprobar si un numero dado es un numero de la suerte
« 1 2 ... 5 6 »
Programación Visual Basic
|
Karcrack
|
53
|
23,792
|
17 Agosto 2010, 23:58 pm
por Dessa
|
|
|
|
Dividir en varias partes diccionario Ayuda!!
Dudas Generales
|
itzg3
|
1
|
2,458
|
26 Marzo 2014, 00:27 am
por engel lex
|
 |
