Grille de chiffres en ...

CBernardT

XLDnaute Barbatruc

• 4 Septembre 2009

• #2

Re : Grille de chiffres en ...

Bonjour Guido,

Un essai de grille par VBA.

Cordialement

Bernard

 

Pièces jointes

• GrilleAleatoireV1.xls

  25.5 KB · Affichages: 95

Dernière édition: 4 Septembre 2009

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 4 Septembre 2009

• #3

Re : Grille de chiffres en ...

Bonsoir,

un petit essai :

Edit, oupss, désolé, CBernardT, j'avions point raffraichi....

 

Pièces jointes

• Grille aleatoire_v1.xls

  32 KB · Affichages: 99

Dernière édition: 4 Septembre 2009

Vote positif 0 Vote négatif

CBernardT

XLDnaute Barbatruc

• 4 Septembre 2009

• #4

Re : Grille de chiffres en ...

Bonjour bhbh,

Tu es complètement excusé, cela m'arrive aussi une fois sur deux 🙄

Au plaisir de te lire

Bernard

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 4 Septembre 2009

• #5

Re : Grille de chiffres en ...

bonjour a tous

Ma version

NB:je jette un oeil tres interessé a vos oeuvres

 

Pièces jointes

• Grille aleatoire.zip

  2.5 KB · Affichages: 60
• Grille aleatoire.zip

  2.5 KB · Affichages: 49
• Grille aleatoire.zip

  2.5 KB · Affichages: 48

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 4 Septembre 2009

• #6

Re : Grille de chiffres en ...

Re-,

Hi, Pierrejean....

Tellement ravi de te revoir, que j'ai téléchargé ton fichier....

Mais.....

Point de code....

Comment?

Bah, une modif dans le fil, et tout sera réparé....

Au plaisir...😀

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 4 Septembre 2009

• #7

Re : Grille de chiffres en ...

Re

Si je peux me permettre

@ CBernardT
Il me semble que le tableau d'origine ne peut etre modifié ni en quantité (180 cases) ni en contenu

@bhbh
Il me semble que le tableau doive etre tout d'abord revu dans la feuille origine

Dans ma version le tableau d'origine n'est pas utilisé et les valeurs peuvent etre modifiée a tout moment

Arf !! : Toujours aussi distrait moi !!
Ais oublié d'enregistrer
Bien entendu : Ravi de vous croiser tous deux egalement (j'espere ne pas avoir posté un de vos fichiers que j'ai egalement telechargé)

 

Pièces jointes

• Grille aleatoire.zip

  12.4 KB · Affichages: 56
• Grille aleatoire.zip

  12.4 KB · Affichages: 57
• Grille aleatoire.zip

  12.4 KB · Affichages: 55

Dernière édition: 4 Septembre 2009

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 4 Septembre 2009

• #8

Re : Grille de chiffres en ...

Salut Guido, Bernard🙂, bh²🙂, pierrejean🙂, le Forum

Vos codes me feront toujours rager 😡 mais de Bonheur 😀 sauf celui de pierrejean😛 il est passé à l'as ...MaisQuelAS... 😎

Sans rire et en étant sérieux 😀, pourquoi pas une formule 😱

Code:

=ALEA()*1000

essaie ce fichier en appuyant sur F9 pour changement

heu...Sidoublons...pasmafaute 😱

Bonne Journée

 

Pièces jointes

• Guido.xls

  19 KB · Affichages: 72
• Guido.xls

  19 KB · Affichages: 80
• Guido.xls

  19 KB · Affichages: 82

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 4 Septembre 2009

• #9

Re : Grille de chiffres en ...

Re,

pas encore vu ta soluce, Pierrejean (mais ça ne va pas tarder....)

la même que la mienne, pour montrer qu'on peut mettre n'importe quoi....

 

Pièces jointes

• Grille aleatoire_v2.xls

  35 KB · Affichages: 106

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 4 Septembre 2009

• #10

Re : Grille de chiffres en ...

Re-,

Vu ta soluce, PierreJean....

Fonctionne tout pareil que la mienne

j'ai juste mis sur 2 onglets, afin de maintenir l'onglet d'origine

il est bien évident qu'on peut travailler sur un seul....

PS, pour LeGarsQuiSeCroitPlusAuSudQueMoi

Effectivement, Aléa, mais avec des risques de doublons....

A Tit'Punch......

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 4 Septembre 2009

• #11

Re : Grille de chiffres en ...

Re

Salut dull 🙂

@bhbh
Cela je le savais
ce que je voulais faire remarquer c'est qu'avec ma soluce on peut changer la valeur d'une cellule et l'aleatoire suivant la reprendra

Edit: Oui effectivement
Il suffit de remplacer
Set Plg = Sheets("Origine").Range("C3:K22")
par
Set Plg = Sheets("Resultat").Range("C3:K22")

 

Dernière édition: 4 Septembre 2009

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 4 Septembre 2009

• #12

Re : Grille de chiffres en ...

Re-,

on peut changer la valeur d'une cellule et l'aleatoire suivant la reprendra

Cliquez pour agrandir...

Tout pareil....😉

Le bonjour à Dany

Hub, qui vous envoie tout plein de soleil de Nouvelle-Calédonie

 

Vote positif 0 Vote négatif

CBernardT

XLDnaute Barbatruc

• 4 Septembre 2009

• #13

Re : Grille de chiffres en ...

Re,

Bonjour Pierrejean

Effectivement j'avais pris le tableau exemple avec les valeurs en place.

Je place un autre exemple avec des valeurs aléatoires dans la grille.

Désormais le tableau d'origine peut etre modifié en quantité et en contenu....

Par contre un seul système aléatoire suffit 😛😛

Grand plaisir à te croiser

Cordialement

Bernard

 

Pièces jointes

• GrilleAleatoireV2.xls

  24 KB · Affichages: 63

Dernière édition: 4 Septembre 2009

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 4 Septembre 2009

• #14

Re : Grille de chiffres en ...

Re-,

Euh....?????

Il suffit de remplacer
Set Plg = Sheets("Origine").Range("C3:K22")
par
Set Plg = Sheets("Resultat").Range("C3:K22")
Aujourd'hui 15h24

Cliquez pour agrandir...

Ben, pourquoi????

Je suis parti d'un tableau "Origine", que je conserve....

Et j'en sors un tableau "Aléatoire"....

Toute modification ultérieure doit être faite sur le tableau "Origine"....

GPDM

 

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 4 Septembre 2009

• #15

Re : Grille de chiffres en ...

Re le fil

PierreJean...du Grand Art...🙂 ...PourleKanakquiestplusausudquemoi...Mouarffff!!! 😀 et le fil... C'est définitif ...c'estmatournée...😉 vu qu'ont approche allègrement des 18:00

C'était juste pour vous saluer "bande de décodeur" 😀 sachant bien que la formule présentait de réels défauts c'était le seul moyen de vous saluer sans...déconnage horaire 😱😕😀😉

Hub, qui vous envoie tout plein de soleil de Nouvelle-Calédonie

Cliquez pour agrandir...

Idem pour moi de l'océan indien 🙂

Bonne Journée

 

Vote positif 0 Vote négatif