Discussion :

[ivan34]

Bonjour,
Je cherche la façon dont je pourrais résoudre à l'aide d'une macro le pb suivant: J'ai 4 colonnes
CelA CelB CelD CelE
Je veux comparer mes col CelA et CelD et tester si elles sont identiques
Si c'est le cas je soustrais la valeur de la CelB a CelE que j'affiche dans CelG (en clair si CelA = CelB alors J'affiche résultat de CelB - CelE dans CelG)



Merci pour vos réponses

[casefayere]

Bonjour,
code à adapter :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Sub calcul()
Dim i As Integer
With Sheets("feuil1")
For i = 1 To .Range("a65000").End(xlUp).Row
If .Range("a" & i) = .Range("d" & i) Then
.Range("g" & i) = .Range("e" & i) - .Range("b" & i)
End If
Next i
End With
End Sub

Bonne journée