Rechercher une ligne grace à 2 données

Louis332 -  
melanie1324 Messages postés 1504 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je recherche le code me permettant d'exprimer la phrase ci dessous:
"Selectionner la ligne contenant une certaine date et un certain fournisseur."
Pour être plus clair je veux selectionner une ligne en fonction de 2 cellules
Merci de votre aide,

Louis
A voir également:

1 réponse

Réponse 1 / 1
melanie1324 Messages postés 1504 Date d'inscription   Statut Membre Dernière intervention   155
 
Bonjour,

je suppose que la date est en colonne 1, que le fournisseur est en colonne 2.
Qu'il existe toujours une valeurs dans la colonne 1.
je suppose également que je recherche la 01/01/2014 et le fournisseur Tartempion. 


Sub rechercheavec2criteres()

Dim i, ligne as variant

i= 1

ligne = 0

do while cells(i,1) <> ""  'tant que la cellule de la ligne i et de la colonne 1 est non vide

  if cells(i, 1) = "01/01/2014" and cells(i, 2) = "Tartempion" then  
    'si la cellule de la ligne i colonne 1 = 01/01/2014
    'et si la cellule de la ligne i colonne  2 = Tartempion alors
    ligne = i
  end if

  i=i+1 'on passe à la ligne suivante
loop

If ligne > 0 ' si une ligne contenant 01/01/2014 et tartempion a été trouvée alors
  Rows(ligne).select 'sélection de la ligne
end if

end sub
0
Louis332
 
Merci Mélanie,
ton code n'était pas directement applicable sur ma macro mais tu m'as donné des éléments de réponse qui m'ont permis de me débrouiller.
0
melanie1324 Messages postés 1504 Date d'inscription   Statut Membre Dernière intervention   155
 
J'ai fait avec les éléments donnés. Si c'est résolu, peus-tu le mettre comme ca (en dessous du titre).
0

Discussions similaires

Que veut dire "correspondant occupé" lors d'un appel ?
veroaaa -
Pat -

10 réponses