Soustraction recherchev en boucle

Soustraction recherchev en boucle - VB/VBA/VBS - Programmation

Marsh Posté le 03-04-2019 à 17:48:11    

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?

Reply

Marsh Posté le 03-04-2019 à 17:48:11   

Reply

Marsh Posté le 07-04-2019 à 13:26:30    

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.
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed