Macro formule cellules

[JACKOT]

Coucou Forum,

Je voudrais créer une macro qui pour toute cellule de la feuil1 de a1:a50 qui serait egale à la cellule b de la meme ligne alors c meme ligne est egale à 10

si a1=1 et b1=2 c=3
si a2=5 et b2=3 alors c2=8
si a3=2 et b3=2 alors c3=10

Et je ne vaux pas passer par dans le cellule C avec =SI(A1=B1;10;A1+B1)
Il me faudrait absolument une macro

Voila...

Merci

 

[Baside]

Bonjour Jackot le forum

Et voila la macro

Dim X As Integer
Sub ControleAB()
For X = 1 To 50
If Cells(X, 1) = Cells(X, 2) Then Cells(X, 3) = Cells(X, 1) + Cells(X, 2)
If Cells(X, 3) = 0 Then Cells(X, 3) = ' '
Next
End Sub

Bonne journée, Baside

 

[Baside]

Bonjour Jackot le forum

Sur le fichier joint, la macro peut être activée de n'importe où
Sur le précèdent post il fallait que la feuille active soit la feuille1

Baside [file name=SommeAB.zip size=8052]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/SommeAB.zip[/file]

 

[JACKOT]

Re baside

merci a toi pour tout ca

a+

 

[Baside]

Bonjour Jackot le forum

De rien

Au plaisir, Baside