Forums XLPages

Tous les messages (Guy)

« 1 ... 44 45 46 47
Re: Analyse combinatoire
Accro XLPages

Inscription: 09/01/2008
De Montréal, Québec

Messages: 463

Système d'exploitation:
PC
Version Excel utilisée:
97 à 2016
Posté le : 14-06-2008 11h19
Bonjour,

J'ai bien potassé le code et les feuilles mais je n'aperçois toujours pas le but de l'exercice.

Que cherches-tu à faire au juste?
Produire des arrangements de lettres de l'alphabet?
Autre chose?

Hors Ligne
Rapport   Haut 

Re: Analyse combinatoire
Accro XLPages

Inscription: 09/01/2008
De Montréal, Québec

Messages: 463

Système d'exploitation:
PC
Version Excel utilisée:
97 à 2016
Posté le : 14-06-2008 00h15
Bonjour,

J'ai téléchargé le classeur et je ne vois pas bien le but de l'exercice.
Les remarques précédentes sont fort pertinentes mais il me semble que le noyau du problème se situe dans la combinatoire.
Donc, s'agit-il de sortir tous les arrangements possible de six lettres parmi vingt-six ou quoi?

Aussi à quoi sert la feuille Mémo?

Serait-ce quelque chose comme :

Public Function Arrangements(ByVal m As LongAs Long) As Long

  Dim Fact 
As Long
  
  Fact 
1
  
Do Until p 0
    
    Fact 
Fact * (m)
    
1
    p 
1
    
  Loop

  Arrangements 
Fact
  
End 
Function


Cordialement,

Guy

Hors Ligne
Rapport   Haut 

Re: UserForm
Accro XLPages

Inscription: 09/01/2008
De Montréal, Québec

Messages: 463

Système d'exploitation:
PC
Version Excel utilisée:
97 à 2016
Posté le : 10-01-2008 04h05
Bonjour,

J'ai zieuté rapidement le code.

Il y a trois formulaires :
[list=1]
[*]code
[*]fdp
[*]note
[/list]

De quel formulaire est-il question au juste?

Tous ces formulaires sont ouverts avec l'instruction [formulaire].Show sans paramètre donc ouvert en modal (par défaut)
À quel formulaire doit-on s'attarder pour tenter de répondre à la question?
Aussi, seuls les modules de code des feuilles de calcul portent la directive Option Explicit, il serait bon de préfixer tous les modules sans exception de cette directive puisque rien ne compile si d'aventure on l'y ajoute quelque part.

*** Examen du code par MZ-Tools ***
Groupe de projets
VBAProject (Bulletin (par défaut).xls)
Feuilles
note
(Général)-(Déclarations)
La déclaration Declare 'FindWindow' n'est pas utilisée
La déclaration Declare 'SendMessage' n'est pas utilisée
La déclaration Declare 'ReleaseCapture' n'est pas utilisée
La constante 'WM_NCLBUTTONDOWN' n'est pas utilisée
La constante 'HTCAPTION' n'est pas utilisée
La variable 'JF' n'est pas utilisée
Private Sub btnOK_Click()
La procédure 'btnOK_Click' n'est pas utilisée
Private Sub btnSuppr_Click()
La procédure 'btnSuppr_Click' n'est pas utilisée
Modules
Module_principal
Sub test()
La variable 'a' n'est pas utilisée
*** fin d'examen ***

Bref, des précisions s'imposent.

Cordialement,

Guy

Hors Ligne
Rapport   Haut 

« 1 ... 44 45 46 47