P pledger XLDnaute Junior 6 Décembre 2011 #1 Bonjour le forum Je voudrais savoir si il existe une macro qui défusionne toutes les cellules d'un onglet. Et si il était possible de désactiver les messages de confirmation d'Excel . Merci d'avance
Bonjour le forum Je voudrais savoir si il existe une macro qui défusionne toutes les cellules d'un onglet. Et si il était possible de désactiver les messages de confirmation d'Excel . Merci d'avance
JCGL XLDnaute Barbatruc 6 Décembre 2011 #2 Re : Macro Défusion de cellules Bonjour à tous, Peux-tu essayer : Cells.UnMerge Cliquez pour agrandir... A+ à tous Vote positif 0 Vote négatif
Re : Macro Défusion de cellules Bonjour à tous, Peux-tu essayer : Cells.UnMerge Cliquez pour agrandir... A+ à tous
P pledger XLDnaute Junior 6 Décembre 2011 #3 Re : Macro Défusion de cellules Bonjour JCGL, Ca march nikel merci =) @+ Vote positif 0 Vote négatif
P pledger XLDnaute Junior 6 Décembre 2011 #4 Re : Macro Défusion de cellules j'ai tester ceci : Sub TEST() Dim wb As Workbook For Each wb In Workbooks If wb.Name Like "Analyse*" Then wb.Sheets("Concaténation").Select Cells.Select Cells.UnMerge End If Next wb End Sub Cliquez pour agrandir... Mais j'ai une erreur 1004 comment la résoudre ? Dernière édition: 6 Décembre 2011 Vote positif 0 Vote négatif
Re : Macro Défusion de cellules j'ai tester ceci : Sub TEST() Dim wb As Workbook For Each wb In Workbooks If wb.Name Like "Analyse*" Then wb.Sheets("Concaténation").Select Cells.Select Cells.UnMerge End If Next wb End Sub Cliquez pour agrandir... Mais j'ai une erreur 1004 comment la résoudre ?
P pledger XLDnaute Junior 7 Décembre 2011 #5 Re : Macro Défusion de cellules Bonjour le fil , je relance car je n'ai pas trouver de solution , merci d'avance à tous Vote positif 0 Vote négatif
Re : Macro Défusion de cellules Bonjour le fil , je relance car je n'ai pas trouver de solution , merci d'avance à tous
JCGL XLDnaute Barbatruc 7 Décembre 2011 #6 Re : Macro Défusion de cellules Bonjour à tous, Pas de problème avec ton code (réduit ici) : Option Explicit Sub Test() Dim Wb As Workbook For Each Wb In Workbooks If Wb.Name Like "Analyse*" Then Wb.Sheets("Concaténation").Cells.UnMerge Next Wb End Sub Cliquez pour agrandir... Es-tu certain d'avoir un fichier qui se nomme "Analyse ...." et au moins un feuille qui se nomme "Concaténation" dans ce fichier ? A+ à tous a+ Vote positif 0 Vote négatif
Re : Macro Défusion de cellules Bonjour à tous, Pas de problème avec ton code (réduit ici) : Option Explicit Sub Test() Dim Wb As Workbook For Each Wb In Workbooks If Wb.Name Like "Analyse*" Then Wb.Sheets("Concaténation").Cells.UnMerge Next Wb End Sub Cliquez pour agrandir... Es-tu certain d'avoir un fichier qui se nomme "Analyse ...." et au moins un feuille qui se nomme "Concaténation" dans ce fichier ? A+ à tous a+