Sujet Précédent Sujet Suivant

VBA - Recherchev si condition respectée

Fermé
Laura - 25 févr. 2019 à 18:15
jordane45 Messages postés 38446 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 28 février 2025 - 25 févr. 2019 à 21:38
Bonjour,

ça fait deux jours que je planche sur une macro et je n'arrive pas à m'en sortir.

Voici ce que je souhaite faire:
Par exemple, si je traite les données du mois de mars, j'aimerais que la macro parcourt les colonnes E à P (càd janv à décembre) jusqu'à qu'elle trouve "Mars". Quand elle trouve "Mars", elle applique la formule souhaitée (ici une recherchev) à partir de la ligne 2, sinon elle passe à la colonne suivante (Colonne E jusqu'à P). Ainsi de suite chaque mois, en sachant que le mois du traitement est inscrit dans la feuille "Source!"
Quelqu'un aurait-il une idée svp?
Merci d'avance.

1 réponse

Réponse 1 / 1
jordane45 Messages postés 38446 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 28 février 2025 4 737
25 févr. 2019 à 21:38
Bonjour,
Cela ne semble pas compliqué expliqué comme ça.....
Commence par nous montrer le code essayé en nous indiquant en quoi il n'est pas conforme à tes attentes (car ici on aide... mais on ne fait pas le travail à ta place....) ...


0

Discussions similaires

[Excel] Recherche de Texte avec RechercheV
Mafia06 -
P-A -

Bonjour,

j'aimerai que ma formule rechercheV recherche du Texte et non une valeur est-ce possible ?

6 réponses
"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

Bonjour,
Nous avons un problème dans la programmation de notre VBA. Voici notre programme:

Sub Bloucle1Bull()
Dim a, k As Integer

k = 2
Do While Worksheets("formulaire").Cells(2, 2) Worksheets("formulaire").Cells(k, 4)
k = k + 1
Loop


a = 2
Do While Worksheets("formulaire").Cells(k + 1, 4) Worksheets("BDD Call").Cells(a, 1) Or (Worksheets("BDD Call").Cells(a, 4) = (Worksheets("Bullspread").Cells(2, 3) + 100)) Or Worksheets("BDD Call").Cells(a, 7) Worksheets("bullspread").Cells(2, 7)
a = a + 1
Loop

''''''''''''on recopie la ligne du premier call trouvé pour le jour 2 ...

2 réponses
RECHERCHEV additionne les plusieurs lignes du meme nom
pfl.bourde -
pfl.bourde -

Bonjour,

J'ai un fichier excel avec des numéros de dossiers en colonne A, les numéros de factures en colonne B et les montants des factures en colonne C.
Il peut y avoir plusieurs factures pour un même numéro de dossier, donc plusieurs lignes pour un même dossier. Exemple:

Dossier Facture Montant
121212 011065 500,00
121212 021065 500,00
121212 031065 500,00

Sur un autre fichier ou son répertoriés les numéros de dossiers, je souhaite effectuer une RECHERCHE V pour récupérer le montant total des factures par dossier.

PROBLÈME : lorsque je fais une RECHERCHEV par dossier, l...

2 réponses
Combiné SI et RECHERCHEV excel
Jack_636 -
Jack_636 -

Bonjour,

je souhaiterai effectuer une recherche vertical dans un tableau excel sauf que la colonne de la valeur renvoyée est conditionnée par une autre cellule. Comment dois-je faire pour combiner le test SI avec la recherche ?

Pour etre plus précis mon "No_index_col" peut etre 3, 6, 9 ou 12 en fonction de la valeur d'une cellule.

Merci pour votre aide



Configuration: Windows XP / Firefox 3.5.19

5 réponses
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

Bonjour,

Je ne comprend pas pourquoi j'ai une erreur d'execution 13 : incompatibilité de type car mon code marchait très bien avant...Je met en gras la ligne où il y a l'erreur


'affichage des feuilles concernées et vérification des champs Sheets("Recap").Visible = True If Cathégories = "" Then MsgBox "Sélectionnez une catégorie de défauts dans la liste déroulante" ElseIf défauts = "" Then MsgBox "Sélectionnez un défauts qualité dans la liste déroulante" Exit Sub End If Dim i As Integer Dim n As Integer n = 3 i = 2 MsgBox "Veuillez patienter pendant le traitement..." Application.Cursor = xlWait 'affiche le sablier 'Suppression des don...

5 réponses