Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1307 connectés 

  FORUM HardWare.fr
  Programmation

  [VBA] Pb avec ma boucle while .... Synthaxe sans doute

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBA] Pb avec ma boucle while .... Synthaxe sans doute

n°89274
olicel
Posté le 15-01-2002 à 09:28:49  profilanswer
 

voila j'aimerais faire ca
 
While ((rangdumois = OccuranceMatricule(matricule, F_JANVIER,rangdumois))<> 0)
            .... le reste
Wend
 
mais ca ne marche pas rangdumois ne change pas, c'est comme si ma focntion ne retournais rien, alors j'ai essayé ca :
 
While (OccuranceMatricule(matricule, F_JANVIER,rangdumois)<> 0)
            rangdumois = OccuranceMatricule(matricule, F_JANVIER, rangdumois)
            .... le reste
Wend
 
la ca marche mais je fais 2 fois l'appel a la fonction OccuranceMatricule pour rien, et comme j'essaye d'optimiser mon code ...
 
Donc, pkoi ca me fait ca ?

 

[edtdd]--Message édité par olicel--[/edtdd]


---------------
toujours un petit mot gentil:
mood
Publicité
Posté le 15-01-2002 à 09:28:49  profilanswer
 

n°89275
thecoin
Chasseur de chasseur de canard
Posté le 15-01-2002 à 09:42:14  profilanswer
 

Je suis pas un specialiste VB,mais essaye un truc du gengre
 
do
 rangdumois = OccuranceMatricule(matricule, F_JANVIER,rangdumois)
while(rangdumois=0)
 
je sais meme pas si le do...while existe en VB :??:


---------------
Si tu regardes ce que le canard mange, tu ne mangeras pas de canard.
n°89277
olicel
Posté le 15-01-2002 à 09:44:41  profilanswer
 

ouai ca marche mais je vais faire un tour de trop dans ma boucle la ? j'essaye 2sec


---------------
toujours un petit mot gentil:
n°89281
olicel
Posté le 15-01-2002 à 09:55:23  profilanswer
 

be voila ca marche mais fo que je fasse ca alors mais ca me fait deux conditions... mais bon c deja beaucoup mieux que deux fois ma fonction, qui est longue en plus ...
 
Bon si j'ai pas d'autre sol je fais ca mais j'aurais aimé comprendre pkoi ce VBA de merde(parce que vraiment ca pu) me fait ca. Avant je faisais du C++, c carrement plus clair comme language
 
alors ma solution ?


---------------
toujours un petit mot gentil:
n°89317
Mara's dad
Yes I can !
Posté le 15-01-2002 à 10:55:10  profilanswer
 

Solution standard VB :
 
rangdumois = OccuranceMatricule(matricule, F_JANVIER, rangdumois)
While (rangdumois <> 0)
           
           .... le reste
           rangdumois = OccuranceMatricule(matricule, F_JANVIER, rangdumois)
Wend


---------------
Laissez l'Etat dans les toilettes où vous l'avez trouvé.
n°89324
olicel
Posté le 15-01-2002 à 11:02:54  profilanswer
 

a bon  :??:  
 
be alors je vais faire comme ca...


---------------
toujours un petit mot gentil:
n°89815
Sylderon
Posté le 16-01-2002 à 10:21:25  profilanswer
 

En C tu as 2 opérateurs (= et ==) pour les opérations d'initialisation et de test d'égalité.
En VBA seul l'opérateur = existe pour ces deux opérations.
Dans le cadre d'une instruction While, VBA ne doit pas interpréter = comme une initialisation !
Donc ta formule

Citation :


While ((rangdumois = OccuranceMatricule(matricule, F_JANVIER,rangdumois))<> 0)


n'est pas interprétée comme l'affectation d'une valeur retournée par la fonction, puis sa comparaison à 0 mais comme la comparaison entre rangdumois et le résultat de ta fonction, puis entre le résultat de cette première comparaison et 0.
 
J'espère avoir été clair :)
 
A+

 

[edtdd]--Message édité par sylderon--[/edtdd]

n°89820
olicel
Posté le 16-01-2002 à 10:47:21  profilanswer
 

ouai c bon j'ai compris  :pt1cable:  
 
merci  :jap:  au moins je sais pkoi il me faisait ca


---------------
toujours un petit mot gentil:

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation

  [VBA] Pb avec ma boucle while .... Synthaxe sans doute

 

Sujets relatifs
[MFC Dialog Based - VS6] Lancement d'une boucle par un boutonAcces VBA supprimer une BD via le code...
[VBA] macro d'initialisation dans un modèle xl[VBA] Comment extraire un caractere d'un chaine de type string.
[Delphi 6] comment chronométrer une boucle ? + pb compteur (résolu)[VBA] Excel : besoin de divers codes...
[C++] Lire un .mid en boucle (Command MCI)[VBA] Comment sauter les mot de passe de protection du code !!!!
[VBA] encore !!!! MultiPage et Page[Access97/VBA] utilisation biblio externe
Plus de sujets relatifs à : [VBA] Pb avec ma boucle while .... Synthaxe sans doute


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR