Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Problème de boucle avec FindNext

Calvus

XLDnaute Barbatruc
Bonjour le Forum,

Des fois Excel c'est vraiment casse-pieds !

J' ai un problème de boucle que je n'arrive pas à résoudre, et je n'ai même plus de cheveux à m'arracher !


J'ai des références en feuille 1, colonne C (C20:C53), les prix correspondant en colonne H et un client en B12 de la même feuille.

Je dois chercher ma référence dans le tableau de la feuille 2.
Si la colonne T de ma ligne est vide ET que le colonne F correspond au client (Feuil1[B12]), alors inscrire le prix en colonne T de la ligne correspondante.
Plusieurs références identiques peuvent être présentes dans le tableau.

La boucle Do While ne se fait pas.

Dites moi si vous voulez plus de précisions.

Merci

PS : Petite précision. En mettant la ligne de code : If Not mvstffset(0, 17) Is Nothing Then
cela me parait plus logique mais entraîne une erreur 91.....
 

Pièces jointes

  • Boucle Find.xlsm
    21.1 KB · Affichages: 67
Dernière édition:
Trier par date Trier par votes

Calvus

XLDnaute Barbatruc
Re : Problème de boucle avec FindNext

Merci 00,

Ça fonctionne ! un @ s'était immiscé devant produit dans la formule !

A bientôt

PS : calme sir l'apéro ! ça fait faire des errrus !!
 
Vote positif 0 Vote négatif
S

Si...

XLDnaute Barbatruc
Re : Problème de boucle avec FindNext

salut

HouHou ÒÓ,
pour continuer à mettre le Tableau à l’honneur … en filtrant sans rechercher avec Find ou VLOOKUP)!
 

Pièces jointes

  • Chauve qui peut.xlsm
    39.3 KB · Affichages: 67
Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc
Re : Problème de boucle avec FindNext

Re-bonjour,

Après avoir perdu quelques cheveux , à mon tur... je découvre...

- a :

Ça fonctionne ! un @ s'était immiscé devant produit dans la formule !... l'apéro ! ça fait faire des errrus !!
Cliquez pour agrandir...

- b :

Calvus à dit:
...Ici :
Code: 
 .FormulaR1C1 = "=VLOOKUP([@Produit],Feuil1!R20C3:R53C8,6,0)"
Cliquez pour agrandir...

Le soleil ! ça fait faire des zâneries et moi plus savoir si code OK ou NOK

A bientôt
 
Vote positif 0 Vote négatif

Calvus

XLDnaute Barbatruc
Re : Problème de boucle avec FindNext

Re,

Ton code, avec .FormulaR1C1 = "=VLOOKUP([@Produit],Feuil1!R20C3:R53C8,6,0)"ne fonctionne pas.

Corrigé par .FormulaR1C1 = "=VLOOKUP([Produit],Feuil1!R20C3:R53C8,6,0)" fonctionne.

A bientôt
 
Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc
Re : Problème de boucle avec FindNext

Re-bonjour, bonjour, Si,

DoubleZero à dit:
...Le soleil ! ça fait faire des zâneries et moi plus savoir si code OK ou NOK ...
Cliquez pour agrandir...

Le soleil faisant dodo, j'ai compris :

Ton code, avec .FormulaR1C1 = "=VLOOKUP([@Produit],Feuil1!R20C3:R53C8,6,0)"ne fonctionne pas.

Corrigé par .FormulaR1C1 = "=VLOOKUP([Produit],Feuil1!R20C3:R53C8,6,0)" fonctionne.
Cliquez pour agrandir...

A bientôt
 
Vote positif 0 Vote négatif

Calvus

XLDnaute Barbatruc
Re : Problème de boucle avec FindNext

Bonsoir,

Le code placé dans un module fonctionne sur un grand tableau.

Mais, placé dans le code de la feuille, il bloque sur la ligne 119. C'est à dire que la 1ère occurrence se fait sur 119, alors que le tableau comporte 549 lignes...

Quelle en est la raison ?

Merci
 
Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc
Re : Problème de boucle avec FindNext

Bonjour, Calvus , Si, le Forum,

Calvus à dit:
...placé dans le code de la feuille, il bloque sur la ligne 119. C'est à dire que la 1ère occurrence se fait sur 119, alors que le tableau comporte 549 lignes... Quelle en est la raison ?...
Cliquez pour agrandir...



Je n'en ai aucune idée.

Sur 10824 lignes, la macro dure quelque deux secondes.

Tu n'as pas vu le travail de Si....

A bientôt
 
Vote positif 0 Vote négatif
S

Si...

XLDnaute Barbatruc
Re : Problème de boucle avec FindNext

Re

Calvus : pourquoi initialiser un Tableau si tu n’utilises pas ses possibilités ?

… & ÓvÒ : le @ du titre du tableau, bien qu’inutile, s’inscrit automatiquement avec l’enregistreur de macro.
Cela peut expliquer sa présence dans la formule
=VLOOKUP([@Produit]...
Cliquez pour agrandir...
.
Désolé mais je n'ai pas testé ta proposition donc je ne peux rien en dire.

Bon dimanche
 
Vote positif 0 Vote négatif

Calvus

XLDnaute Barbatruc
Re : Problème de boucle avec FindNext

Bonjour 00, Si, le forum,

DoubleZero à dit:
Je n'en ai aucune idée.

Tu n'as pas vu le travail de Si....
Cliquez pour agrandir...

Incroyable ! Non, je n'avais pas vu son intervention en effet !

Alors merSissi.

Si à dit:
Calvus : pourquoi initialiser un Tableau si tu n’utilises pas ses possibilités ?
Cliquez pour agrandir...

Parce que je n'ai pas ton talent mon cher.
Du coup, 2 remarques par rapport à ton fichier que je découvre à l'instant, sur la feuille 1 je n'ai pas de tableau, et sur la feuille 2 je n'aurai qu'une référence par client à un moment donné. Un client peut avoir plusieurs "recherches 1", mais une seule vide le même jour à priori.
Je vais voir si je peux adapter ton code, ce qui m'étonnerait quand même !

Merci et bon dimanche également.
 
Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc
Re : Problème de boucle avec FindNext

Re-bonjour,

Si... à dit:
… & ÓvÒ : le @ du titre du tableau, bien qu’inutile, s’inscrit automatiquement avec l’enregistreur de macro.
Cela peut expliquer sa présence dans la formule..
Cliquez pour agrandir...

Merci, Si,

Oui, la formule est issue de l'enregistreur. Ce qui est curieux : la présence du "@" ne provoque aucune erreur sur mon poste.

Si... à dit:
... Désolé mais je n'ai pas testé ta proposition donc je ne peux rien en dire...
Cliquez pour agrandir...

Tu n'as rien perdu, si ce n'est la beauté d'une chevelure particulière !..

Bon dimanche, itou, et à bientôt
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

J
  • Résolu(e)
Microsoft 365 [RESOLU] VBA boucle, insertion plusieurs lignes, exécution formules, suppression sur si
Réponses
5
Affichages
381
Phil69970
L
  • Question
VBA : erreur sur boucle
Réponses
2
Affichages
254
Latias
L
Q
  • Question
Questionnement sur le renvoi à une valeur de cellule selon une autre
Réponses
1
Affichages
166
Valky68
S
  • Résolu(e)
Microsoft 365 [RESOLU] Excel : Calcul de prix en fonction d'un type
Réponses
4
Affichages
149
JHA
J
S
  • Question
Microsoft 365 Problème avec RechercheV
Réponses
3
Affichages
182
STEPHANIE1975
S
  • Question
Microsoft 365 MACRO VBA - Extraire des listes à partir d'une boucle
Réponses
5
Affichages
417
chris6999
A
  • Question
Microsoft 365 recherche multicritère de la valeur suivante
2
Réponses
29
Affichages
758
alexga78
A
J
  • Résolu(e)
Microsoft 365 Problème de décompte avec PQ
Réponses
8
Affichages
258
José FELIX
J
C
  • Résolu(e)
Microsoft 365 Problème VBA lors de l'affichage de ligne masquée
2
Réponses
21
Affichages
596
Chris Linefield
C
J
  • Question
Microsoft 365 création de boucle et suppression de ligne si une cellule est vide
Réponses
2
Affichages
361
JVOS
J
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…