Code VBA pour defusionner des cellules dans un tableau Le 04/06/2020 à 07:55vvinciHorusMembre habituéMessages52Excel2013 frInscrit24/04/2020 BonjourJ'aimerais avoir un code qui de-fusionne des cellules dans un tableau comme indiqué dans ce fichier jointmerci 5classeur1te.xlsm (143.31 Ko) Le 04/06/2020 à 08:34i20100Passionné d'ExcelMessages6'042Excel2010Inscrit16/03/2017Bonjour,à tester,Sub test() For Each c In Range("D1:D30") If c.Value <> "" Then n = n + 1 Range("G" & n + 7) = c End If Next c End SubLe 04/06/2020 à 09:02vvinciHorusMembre habituéMessages52Excel2013 frInscrit24/04/2020merci de la réponsele problème c'est que les bordures n'y sont plusLe 04/06/2020 à 09:11i20100Passionné d'ExcelMessages6'042Excel2010Inscrit16/03/2017 vinciHorus a écrit :merci de la réponsele problème c'est que les bordures n'y sont plusun autre possibilité,Sub test() For Each c In Range("D1:D30") If c.Value <> "" Then n = n + 1 c.Copy Range("G" & n + 7) End If Next c End SubRechercher des sujets similaires à "code vba defusionner tableau"ForumsExcel - VBACode VBA pour defusionner des cellules dans un tableau