Remplir tableau avec conditions

Bonjour,

Je souhaite faire une macro pour mettre le chiffre 1 dans une colonne en fonction du mois dans la ligne.

tout est bien expliqué dans l'exemple ci joint.

Merci beaucoup.

Bonne journée.


L'année commence du mois mars jusqu'a février!!

bonjour,

une proposition, basée sur ton fichier. ne fonctionnera pas si le tableau est placé autrement qu'en C4:O4

Sub colmois()
    i = 5
    While Cells(i, 3) <> ""
        m = Month(Cells(i, 3))
        Select Case m
        Case 1 To 2
            col = m + 13
        Case 3 To 12
            col = m + 1
        End Select
        Cells(i, col) = 1
        i = i + 1
    Wend
End Sub

edit : code corrigé

Non ca ne amrche pas pour le mois de novembre il mets un dans janvier donc ca ne fonctionne pas

Bonjour,

Pas besoin de macro. Voir ci-joint.

je souhaite faire ça sur plusieurs lignes je craints que cava alourdir mon fichier

Merci pour ta solution ça marche si j'ai une macro ce sera encore mieux

re-bonsoir,

j'ai corrigé le code voir ci-dessus

Ca marche !

Parfait

Mercii bcp


est ce que ca te dérangerait de m'expliquer le code un peu

Ce serait Top merci

Rechercher des sujets similaires à "remplir tableau conditions"