Recopie Le 22/05/2019 à 10:14jjpvillMembre habituéMessages74Excel2007Inscrit28/07/2017 Bonjour,Dans le fichier en annexe je souhaiterai que les cellules vides reprennentles données de la cellule de la ligne au dessus.Merci de votre retour (macro). 5recopie-lignes.xlsx (15.02 Ko) Le 22/05/2019 à 10:18Pedro22Passionné d'ExcelMessages5'567Fichiers8Excel2010 FRTél.9'714Inscrit26/01/2017Bonjour,Une proposition : 8recopie-lignes.xlsx (16.26 Ko) Le 22/05/2019 à 12:26jjpvillMembre habituéMessages74Excel2007Inscrit28/07/2017Bonjour Pedro22 Parfait, merci bcp pour la formuleBonne journéeLe 22/05/2019 à 12:52xorsankukaiPassionné d'ExcelMessages4'516Excel2010 FRInscrit07/10/2014Bonjour jpvill,Salut Pedro22, Un essai par macro....Sub test() Dim c As Range With Sheets("Feuil1") Application.ScreenUpdating = False For Each c In Range("A2:E" & .UsedRange.Rows.Count) If c = "" Then c = c.Offset(-1, 0) Next Application.ScreenUpdating = True End With End Sub 4recopie-lignes-2.xlsm (19.68 Ko) Cordialement,Le 22/05/2019 à 14:32jjpvillMembre habituéMessages74Excel2007Inscrit28/07/2017 Merci Xorsankukai,Parfait, résultat topB.JournéeRechercher des sujets similaires à "recopie"ForumsExcel - VBARecopie