Macro codage 0 1 2

Bonjour,
je souhaiterai faire une macro alors j'vous explique
j'ai un fichier avec un nombre de feuille possédant "une colonne" make et colonne "km voila ce que j'voudrais coller dans la colonne AA un "0" si la colonne make est vide, "1" colonne make est remplie et deux si la colonne make est remplie plus colonne km est vide

sachant que pour ton mon fichier je place ma colonne make et ma colonne "km" au même endroit ( colonne M et N par exemple)

ensuite je voudrais compter mon de 0, mon nombre de 1 et mon nombre 2 et aller les placer dans une autre

Merciii :)

Bonjour,
C'est incompréhensible mais c'est une bonne idée!

qu'est ce qui est inconpréhensible?

je possède un fichier excel avec plusieurs feuilles
contenant les colonnes make et totalkm (placés par exemple en M et N)
je souhaiterai pour tout presque tout mon fichier faire une macro qui code dans la colonne AA de chaque feuille 0 si la colonne "make" est vide, 1 si la colonne make est remplie et 2 si la colonne make est remplie et totalkm différent de 0. Je souhaiterai ensuite compter pour chaque feuille mon nombre de 0, puis mon nombre de 1 puis mon nombre de 2 merci !

Bonjour,

Un truc dans le genre ?

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28

Sub Test()   Dim Plage As Range Dim Cel As Range   With Worksheets("Feuil1")   Set Plage = .Range(.Cells(2, 13), .Cells(.Rows.Count, 13).End(xlUp))   End With   For Each Cel In Plage   If Cel.Value = "" Then   Cel.Offset(, 14).Value = 0   Else   Cel.Offset(, 14).Value = 1 If Cel.Offset(, 1).Value > 0 Then Cel.Offset(, 14).Value = 2   End If   Next Cel   End Sub

---

Il n'y a pas besoin de macros pour faire ça!
Une formule avec de si imbriquer!

Ou même la fonction VraiFaut

En colonne AA :

Code:

---

=N(M2<>"")*(N(M2<>"")+N(N2<>""))

---

que tu étends sur toutes les lignes.
Tu peux le faire sur toutes tes feuilles ensuite.