Contenu récent par TMS

Bonjour Staple1600, Merci pour cette alternative. Bonne journée.

Ok, merci pour l'avertissement. Bonne soirée.

Bonjour Jacky, Merci pour ta réponse mais ton code ne donnait pas le résultat attendu. En revanche, après analyse, j'ai pu corriger par moi-même comme suit : Worksheets("Rapport 1").Range("M2:Z2").AutoFill Destination:=Range("M2:Z" & DernLigne) Merci pour ton intervention et bon après midi.

Bonjour, J'utilise actuellement ce code : Sub Recopie_Formules() Dim DernLigne As Long DernLigne = Worksheets("Rapport 1").Range("A" & Rows.Count).End(xlUp).Row Worksheets("Rapport 1").Range("M2").AutoFill Destination:=Range("M2:M" & DernLigne) End Sub Comment modifier le code pour l'appliquer...

Bonjour, Comme convenu, je viens vous tenir au courant : après étude des 3 propositions, j'ai opté pour la solution de Jocelyn qui me paraît la plus adapté à mes besoins. Un grand merci à tous les trois. Bonne journée.

Re bonjour, Merci à tous les trois pour vos réponses que je vais étudier avec le plus grand intérêt. Je ne manquerai pas de vous tenir au courant. Bonne fin de journée à tous.

Bonjour, Dans le fichier-joint, j'ai une colonne avec des catégories (1, 2 et 3) et ensuite des activités avec une date de début et une date de fin. Je cherche par formule à calculer le nombre de jours exact d'activités par mois hors il y a des dates qui commencent un mois et qui finissent un...