pb code vba (macro qui boucle)

[nostress38]

hello besoin d'aide si vous avez le temps
dans un fichier,j'ai crée une macro qui lit des colonnes et retranscrie certaines données sur une autre feuille. Mais
lorsqu'elle lit une colonne vide, la macro boucle et tourne indéfiniment............
Je pense rajouter un truc dans ce genre mais ca foire :
If ligne = 0 then goto next ligne

ou solution de facilité tjrs laisser une info sur une ligne mais bof.....
merci pour votre aide

 

[skoobi]

Re : pb code vba (macro qui boucle)

Bonsoir,

dans un fichier,j'ai crée une macro....

Sans le fichier, on pourra pas t'aider beaucoup.

 

[nostress38]

Re : pb code vba (macro qui boucle)

ok voici le fichier
j'ai pas laissé une feuille vide car j'applique actuellement cette macro

 

[skoobi]

Re : pb code vba (macro qui boucle)

Re,

Chez moi la macro se termine.......
Tu pourrais donner un peu plus de détail car avec toutes ces procédures.....

 

[THE CAT 2007]

Re : pb code vba (macro qui boucle)

Bonjour à tous,

ceci ne serait il pas la suite de :

https://www.excel-downloads.com/threads/associer-bouton-alerte-a-des-donnees.93237/

chez moi aussi elle s'arrête ....

pas de boucle infinie

 

[nostress38]

Re : pb code vba (macro qui boucle)

voici le fichier avec la boucle......qui n'en finit pas
et oui the cat c'est bien ton aide sur ce dossier qui revient merci a toi

 

[djabelkhir]

Re : pb code vba (macro qui boucle)

bonsoir à tous, je fais de la gestion des stocks sur excel et je m'y connais pas en macros, avez-voous des idées sur des macros pour gérer un stock?

 

[THE CAT 2007]

Re : pb code vba (macro qui boucle)

Re bj,

Petit détail dans la sub d'origine, il y avait un if qui dégageait la feuille RECAP des recherches, ce if a disparu dans la sub que tu développes,
REMPLACER
If Left(Sheets(feuille).Name, 5) = "RECAP" Then GoTo sautFeuilleRecap
par
If Sheets(feuille).Name= "feuil3" Then GoTo sautFeuilleRecap
dans ta sub
çà évitera de tester la feuille qui sert de rapport !

la sub d'origine :

Sub BoucleDesFeuilles()
nbFeuilles = Sheets.Count
 For feuille = 1 To nbFeuilles
  If Left(Sheets(feuille).Name, 5) = "RECAP" Then GoTo sautFeuilleRecap
    RechercheDesColonnesLivraisonAtelier feuille
sautFeuilleRecap:
 Next feuille
End Sub

la sub modifiée dans le fichier joint :

Sub BoucleDesFeuilles()
nbFeuilles = Sheets.Count
 For feuille = 1 To nbFeuilles
     RechercheDesColonnesLivraisonAtelier feuille
 Next feuille
End Sub

 

[THE CAT 2007]

Re : pb code vba (macro qui boucle)

bonjour,

gestion des stocks :

prix individuel * nb articles

trier par ordre décroissant
-> ce qui coûte le plus en stock est en tête

-> 20 % de ces lignes devraient représenter 80% du coût du stock ..

réduire en conséquence (intelligemment.. ) le stock des 20% de lignes les plus coûteuses

pas besoin de macro ... économies garanties ... ;-)

 

[nostress38]

Re : pb code vba (macro qui boucle)

Merci the cat 🙂
J'avais essayé d'alleger ta macro, maintenant je comprends mieux cette boucle, merci encore à toi et bon week.

 

[nostress38]

Re : pb code vba (macro qui boucle)

hello
par contre je n'arrive pas à integrer cette nouvelle SUB dans ma nouvelle Macro, quelqu'un y arrive t'il ou y a t'il une autre solution pour eviter cette boucle ?
Merci pour votre aide

 

[THE CAT 2007]

Re : pb code vba (macro qui boucle)

Re bj,

C'est la sub qui parcourt toutes les feuilles pour chercher la colonne ATELIER.

On peut s'en passer... il faut juste faire le travail à la main ...
je vais sur une feuille, je lance les macros
je sélectionne la feuille suivante, je lance les macros

c'est comme vous voulez ;-)

 

[nostress38]

Re : pb code vba (macro qui boucle)

re salut the cat,
alors il faut l'integrer dans le module1 au niveau boucle des feuilles ?

Sub BoucleDesFeuilles()
nbFeuilles = Sheets.Count
For feuille = 1 To nbFeuilles

RechercheDesColonnesLivraisonAtelier feuille

Next feuille

End Sub

 

[pierrejean]

Re : pb code vba (macro qui boucle)

Bonjour nostress38

Salut The Cat 🙂

@nostress

Vois si cela te convient

 

[THE CAT 2007]

Re : pb code vba (macro qui boucle)

Bonjour Pierrejean,

Feuil14 doit être le numéro de "feuil3" ?
je n'ai pas vérifié...

si une autre feuille devenait "feuil3", les en tête ne seront plus au bon endroit ...
voir des données pourraient être écrasées, suivant la mise en page des feuilles

sinon ta sub devrait être nickel ...

pour nostress38 :
dans les feuilles du classeur, il y a la "feuil3" qui sert à collecter les données.
il faut donc exclure la "feuil3" de la boucle des feuilles où rechercher des infos ...