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

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Soustraction recherchev en boucle

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Soustraction recherchev en boucle

n°2331306
etienne03
Posté le 03-04-2019 à 17:48:11  profilanswer
 

Bonjour,
 
Je souhaite faire la soustraction de 2 recherchev et répéter cette opération sur les cellules I2 à I4
Par exemple :
I2 = recherchev1 - recherchev2
I3 = recherchev1 - recherchev2
I4 = recherchev1 - recherchev2
 
J'ai écrit cette formule en y intégrant une boucle, mais ça ne fonctionne pas.  
With Sheets("Vérif" )
    For i = 2 To 4
    .Range("I" & i).Value = WorksheetFunction.VLookup(.Range("A" & i).Value, Sheets("HRA" ).Range("A:O" ), 15, False) - WorksheetFunction.VLookup(.Range("A" & i).Value, Sheets("Choral" ).Range("A:K" ), 11, False)
    Next i
 
End With
 
Pouvez-vous m'aider svp?

mood
Publicité
Posté le 03-04-2019 à 17:48:11  profilanswer
 

n°2331566
MaybeEijOr​Not
but someone at least
Posté le 07-04-2019 à 13:26:30  profilanswer
 

Bonjour,
 
Qu'est-ce qui ne fonctionne pas (message d'erreur) ? Et pourquoi passer par du vba plutôt que de mettre directement tes formules ?


Message édité par MaybeEijOrNot le 07-04-2019 à 13:26:48

---------------
C'est en écrivant n'importe quoi qu'on devient n'importe qui.

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Soustraction recherchev en boucle

 

Sujets relatifs
Boucle foreachErreur en fin de boucle ?
Fonction recherchev vba erreur indiceExcel : soustraction dans condition somme prod
Passer au tour suivant boucle for each et probleme ifBoucle en SQL
probleme de boucleBoucle FOR : ") etait inattendu"
Problème de logique (boucle infinie)Boucle taille fichiers et lancement
Plus de sujets relatifs à : Soustraction recherchev en boucle


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite) / Groupe LDLC / Shop HFR