Imprimir página | Cerrar ventana

insertar registro en campo aleatorio

Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=84533
Fecha de impresión: 13/Octubre/2019 a las 22:20


Tema: insertar registro en campo aleatorio
Publicado por: pepezz72
Asunto: insertar registro en campo aleatorio
Fecha de publicación: 03/Junio/2019 a las 15:27
Hola a todos, 
Gracias por la ayuda de antemano.
Tengo una tabla con 100 campos (al estilo de un sodoku mas o menos). En cada campo puedo poner el numero 0 , 1 o 2 y tengo un numero que eligo al azar del 1 al 20.
En este caso, el numero resultante seria 8 por ejemplo. Quisiera repartir este valor 8 aleatoriamente entre los 100 campos, contando que como mucho solo puede llegar a 2, de manera que la suma total sea 8.
Al estilo:
Campo21 = 1
Campo33 = 2
Campo56 = 2
Campo59 = 1
Campo90 = 1
Campo97 = 1

En otra ocasion, seria otro numero, por ejemplo 17, repartidos en otros campos.
¿Hay alguna posibilidad de ir modificando la actualizacion del campo al estilo Me.Campo(nº aleatorio de 1 a 100)?
Ando perdido, gracias, un saludo.



Respuestas:
Publicado por: Mihura
Fecha de publicación: 03/Junio/2019 a las 15:59
- puedes nombrar los campos de una tabla como:

MiTabla.Fields("NombredeCampo") = El valor

o con una variable:

MiTabla.Fields(VariableNombredeCampo) = El valor

- con la función Randomize puedes generar números aleatorios


Con esas premisas puedes ir generando números aleatorios, comprobar que el campo no contiene valor, generarle el valor que quieras, etc.





-------------
Jesús Mansilla Castells.
Saludos desde Móstoles.

http://www.accessaplicaciones.com" rel="nofollow - Access Aplicaciones
http://www.tecsys.es" rel="nofollow - Tecsys.es


Publicado por: pepezz72
Fecha de publicación: 03/Junio/2019 a las 19:39
Muchas gracias, probaré la segunda opción mañana y os cuento. Saludos


Publicado por: pepezz72
Fecha de publicación: 06/Junio/2019 a las 13:36
No debo estar definiendo correctamente las variables porque me salta el mensaje de que falta el objeto, gracias


Publicado por: Mihura
Fecha de publicación: 06/Junio/2019 a las 14:17
Desde que Emilio se retiró a la vida contemplativa nos quedamos sin la bola de cristal ... LOL


... vamos, que o pones el código que usas o no hacemos nada.




-------------
Jesús Mansilla Castells.
Saludos desde Móstoles.

http://www.accessaplicaciones.com" rel="nofollow - Access Aplicaciones
http://www.tecsys.es" rel="nofollow - Tecsys.es



Imprimir página | Cerrar ventana