AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 07 06 01:52:41
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

FICHIER EXCEL PERMETTANT DE RÉSOUDRE UN PROBLÈME SUDOKU. APRÈS LANCEMENT D'UNE MACRO VB, LE SUDOKU EST RÉSOLU SAUF CERTAINS CAS DIABOLIQUES.


Information sur la source

Catégorie :Jeux Classé sous : sudoku, excel, résolution, jeu Niveau : Débutant Date de création : 16/03/2006 Vu / téléchargé: 9 379 / 1 797
Auteur : JIPERE Ecrire un message privé
Note :
6 / 10 - par 1 personne
6,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Commentaire sur cette source (2)
Ajouter un commentaire et/ou une note

Description

Le problème posé dans une grille on lance la macro par Ctrl+Q tant que le programme trouve des chiffres, car parfois certains problèmes coincent. On peut tenter un chiffre possible dans une case, et relancer la macro, soit le Sudoku se résout, soit ça ne suffit pas, soit c'est faux. Une feuille contient les problèmes résolus avec parfois un chiffre en rouge ajouté quand cela coinçait. A chaque éxécution, la macro analyse les chiffres manquant de chaque lignes par rapport aux colonnes et carré, puis l'inverse, puis il analyse les chiffres manquant de chacune des 9 surfaces par rapport aux colonnes et lignes, puis il découvre le chiffre qui manque /9 par rapport aux colonnes, lignes et carrés (un chiffre ne se retrouve pas sur la même ligne colonne et carré).
 

Conclusion

Pour cela, 1 procédure générale qui apppelle, 1 Subroutine pour lire/écrire les chiffres du tableau et les mettre en 3 tables Lignes colonnes et carrés. Puis 4 procédures, 1 pour analyser par lignes, 1 par colonne, 1 par surface, et 1 rayonnante. Pour cela dans Excel: Outils, Macros, => Sudoku [Modifier]. il n'y a plus qu'à voir...
 

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !
  • Sudoku.xlsTélécharger ce fichier [Réservé aux membres club]92 672 octets

Télécharger le zip

Commentaires et avis

signaler à un administrateur
Commentaire de Cacophrene le 17/03/2006 20:02:38

Salut !

On en revient toujours au débat entre la stratégies difficilement démontrable" et le "rebroussement difficilement stratégique" ! Je m'explique... D'un côté, les stratégies de résolution garantissent une solution rapide, mais démontrer qu'elles résolvent toutes les grilles est délicat (parfois même très ardu, car ce sont des problèmes d'algorithmique qui sont loin d'être triviaux !). La technique rebroussement (pour plus d'infos : clic sur mon nom et clic sur la source "Solveur de sudoku" déposée il y a quelque temps déjà sur VBFrance), quant à elle, satisfera le matheux rigoureux en se prêtant bien à une démonstration d'algorithmique, MAIS le temps de calcul sera globalement plus long (quoique raisonnable, il ne s'agit pas de millions d'années !) que celui des stratégies (autre avantage des stratégies : la méthode de résolution est plus "humaine" que celle d'un rebroussement). D'où ce que je disais : des stratégies peu démontrables et un rebroussement peu stratégique ! Cela dit, c'est une bonne source (mais il existait déjà celle de us_30, également pour Excel).

Cordialement,
Cacophrène

signaler à un administrateur
Commentaire de cdef le 10/04/2006 13:49:22

Bonjour,
Je n'ai pas vu la solution us_30, mais pour le plaisir de réaliser un algorithme avec backtrack en VBA (J'ai fait par le passé un compilateur Prolog), je me suis fait une macro Excel qui résoud les Sudoku, même diabolique en quelques secondes. Je ne l'ai pas diffusé pour ne pas casser le plaisir des passionnés de Sudoku. L'algorithme est simple :
Après avoir saisi la grille initiale, et stockée dans un tableau, il suffit de boucler sur toutes les solutions possibles.
S'il y une solution, la macro la trouvera (parfois il y en a plusieurs).
L'astuce est de calculer à chaque fois les solutions possibles pour chaque case, et de fixer en premier les cases qui n'ont qu'une solution.
Le tout fait environ 50 lignes.

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Résolution d'ecran sur Excel et VBA [ par Quecks ] Slt,je crée des userform avec une résolution 800*600 mais lorsque je les envoie à ceux qui travail avec une résolution 1024*768, les userform ne couvr VB Excel - changer la résolution [ par morickno ] peut ton forcer la résolution d'un écran en code VB-Excelpar exemple forcer un écran en 1024*768 à 800*600Merci sudoku [ par tushar12 ] hritik bonjour tout le monde je dois faire un projet en informatique sur le jeu de sudoku. Donc je voulais savoir si quelqu'un a déja programmer jeu sudoku [ par jerusal ] salut dans le jeu du sudoku j ai fai  la methode de matrice , alors je doi faire un test de soduko c a d que je doi pas avoir le meme numero horizonta Résolution d'équation grâce au solver d'excel [ par eghoufi ] Bonjour,Je dois construire une fonction à l'intérieur de laquelle il faut résoudre une équation a une inconnue de façon numérique.Pour celà, j'ai pens Transfert d'un jeu d'enregistrement vers excel [ par ordynho ] Bonjour tout le monde.Je suis en train de programmer en visualbasic 6.0 mais je suis bloqué.En faite j'ai un jeux d'enregistrement contenu dans un rec Qualité(résolution) de l'exportation en image (excel) [ par zert84 ] Tel est le but de tout conditionnement. Faire aimer aux gens la destination sociale à laquelle ils ne peuvent échapper (A. Huxley) Jeu de dame en VBA - Excel [ par youpss ] Bonjour,Pour les cours, je dois réaliser un jeu de dames utilisable sur excel en vba.Je débute et je ne sais pas comment faire.Pourriez vous m'indique Lire un programme sans paser par excel ? [ par croquemonsieur ] Bonjour je voudrais savoir si il est possible de lire un programme, que j'ai créé grace à virtual basic 6.0, sans passer par excel.En général, je dois résolution écran en VB Excel [ par morickno ] Est il possible de récupérer la résolution de l'écran sur lequel est lancé une appli VB-Excelj'ai regardé dans les quest


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version


Samsung CLX-3175FW Multifunction Laser Colour Printer Laser
Entre 389€ et 469€


Visiter le guide achat

Photothèque Nouveau !

Photo sitges beachPhoto friends
Photo femme, plage, bien être, soleil, vacances, été, détente, reposPhoto plan seul

Visiter la photothèque


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,359 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.