Modifier la dernière ligne de code

[Lone-wolf]

Bonjour à tous,

J'aimerais modifier cette ligne: Range("b8:k13").Value = WorksheetFunction.Choose(Tablo, plage). Malheureusement la fonction n'accepte que 30 arguments et dans le code il y en a 52; j'ai pensé à Index, mais je n'arrive pas à l'adapter au code.


Merci d'avance




A+

 

[Modeste geedee]

Re : Modifier la dernière ligne de code

Bonsour®

Bonjour à tous,

J'aimerais modifier cette ligne: Range("b8:k13").Value = WorksheetFunction.Choose(Tablo, plage). Malheureusement la fonction n'accepte que 30 arguments et dans le code il y en a 52; j'ai pensé à Index, mais je n'arrive pas à l'adapter au code.

avant de modifier le code , il faudrait d'abord faire une analyse ...

tirer 60 valeurs sur 52 , il y aura des doublons !!!

piece jointe sans macro... 52= 4 x 13

 

[Dranreb]

Re : Modifier la dernière ligne de code

Bonjour.
Qu'est-ce que vous cherchez à faire au juste ?
À +

Bonjour Modeste geedee. Joli !

 

[Lone-wolf]

Re : Modifier la dernière ligne de code

Bonjour Modeste geedee, Dranreb,

Comme je cherche à reproduire(+ ou -) le jeu Spider Solitaire, il est normal qu'il y aie des doublons.

@Modeste geedee, je vais regarder le fichier et te redis.


A+

 

[Modeste geedee]

Re : Modifier la dernière ligne de code

Bonsour®

Comme je cherche à reproduire(+ ou -) le jeu Spider Solitaire, il est normal qu'il y aie des doublons.

A+

Windows spider solitaire utilise 2 jeux de 52 cartes ... non ?
selon les options : 1 seule couleur, 2 ou 4 couleurs

 

[Lone-wolf]

Re : Modifier la dernière ligne de code

Re Modeste,

oui, c'est juste. Concernant le fichier, bravo, c'est très bien fait.


A+

 

[Lone-wolf]

Re : Modifier la dernière ligne de code

Bonjour à tous,

@ Modeste geedee: voici en vba, le fichier retouché suite aux conseils que tu m'as donné.

Edit: il faut cliquer sur l'image.




A+

 

[Modeste geedee]

Re : Modifier la dernière ligne de code

Bonsour®
bien pour l'affichage des valeurs faciales

mais Spider solitaire se joue avec 2 fois 52 cartes
au depart 54 cartes sont sur le tapis , 10 seulement sont découvertes, 50 cartes restent au talon

ton algorithme ne permet pas l'unicité du tirage ( c-a-d seulement 2 cartes de chaque couleur et valeur)


nb:
s'il te plait dans le premier message de ce fil , met un titre plus en rapport avec le sujet, merci

 

[Lone-wolf]

Re : Modifier la dernière ligne de code

Rebonsour,

Si tu veux les 5 premières rangées sont les cartes cachées. Pour le titre je ne sais pas quoi mettre.

Peut-être Tirage aléatoire de cartes???


A+