Bonjour à tous,
Voici ma question de la semaine:
J'aimerai à la fin de mon code faire une mise en page de mon fichier.
but: Que mes titres de ma colonne A soient fusionnés afin que l'on est une meilleure visibilitée avec ma colonne B les commentaires.
J'ai donc utilisé l'enregistrement de macro pour avoir un morceau de code de ce que je voudrai:
Le problème est que j'aimerai faire une boucle du style:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 ActiveCell.Range("A1:A5").Select With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter .WrapText = True .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = True End With
Pour A? à prochaine cellule pleine faire fusion sinon aller à la prochaine cellule.
Mais comment faire cette boucle, un coup de main ? please
Merci par avance pour votre aide
PS: mon tableau commence à la cellule A2.
djamat
Partager