Différence entre 2 colonnes

[Cédric]

Bonjour le forum!

J'aimerais savoir s'il est possible, à l'aide d'une macro, de faire la différence pour chaque ligne entre 2 colonnes. Voici un exemple :

a | b | b-a
--------------
12 | 7 | 5
6 | 1 | 5
10 | 2 | 8

Merci !!

 

[G.David]

salut
sub difference()
for t= 1 to 100 ' t est le nombre de lignes a 65536 pour toute la colonne
range('c' & t).value=range('b' & t).value -range('c' & t).value
next
end sub
a placer dans un module

Alt F11 puis insertion module
Cordialement
G.David

 

[porcinet82]

salut cédric,

juste 2 petites modif dans la macro que t'a proposé G.David

Sub difference()
For t = 1 To Range('A65536').End(xlUp).Row
Range('c' & t).Value = (Range('b' & t).Value - Range('a' & t).Value)
Next
End Sub

voila, bonne journé
@+

 

[Cédric]

Merci beaucoup cela fonctionne parfaitement mais il y a un soucis. La premiere ligne de mes colonnes contient du texte (le titre) et ça pose un proble. Comment le résoudre?

Encore merci pour votre savoir et votre réactivité!!

 

[Cédric]

C'est bon le proble me est résolu! Voilà le nouveau code :

For t = 2 To Range('A65536').End(xlUp).Row
Range('C' & t).Value = (Range('B' & t).Value - Range('A' & t).Value)
Next

Et encore merci!!