Contenu récent par M.S.

Hello mdidish, Merci beaucoup pour ton aide. J'ai pu finaliser le code pour mon classeur selon tes indications. Avec cependant quelques corrections, mais c'était exactement ce dont j'avais besoin : For k = Sheets(fMois(1)).Range("B65536").End(xlUp).Row To 3 Step -1 Devient: For j =...

Merci pour le tip BrunoM45.

Hello mdidish, Merci beaucoup pour ton aide, la macro fonctionne parfaitement comme suit, maintenant j'aimerais l'appliquer à tous les mois de l'année. Rajouter les feuilles : Janvier, Février ..........Décembre. Private Sub Workbook_Open() Dim i, j, k As Integer Dim Base, Janv As...

Bonjour, Voici le fichier exemple.

Pardon rectificatif : Private Sub Workbook_Open() Dim i As Integer, j As Integer, k As Integer Dim Base As String, Janvier As String Base = "Feuil3" Janvier = "Feuil14" For i = Sheets(Base).Range("A65536").End(xlUp).Row To 1 Step -1 For j = 1 To...

Bonjour mdidish, Merci de me répondre. Je suis un total "rookie" en VBA. Voici le code que j'essaie d'implémenter automatiquement sans nécessairement sélectionner les lignes et j'ai rajouté en condition la date en colonne L de "Feuil3". Private Sub Workbook_Open() Dim i As Integer, j As...

Bonjour à tous J'ai essayé d'appliquer le code de Fred0o sur un classeur, mais j'obtiens "erreur 9. l'indice n'appartient pas à la sélection." Je voudrais que la macro s'exécute automatiquement. Mes feuilles sont "Feuil3" et "Feuil14" Pourriez vous m'aider SVP. .