Macro adaptable nombre de colonne

_silver -  
eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Est il possible de créer une macro permettant de fusionner toutes les colonnes à l'intérieur de la page d'une ligne?
Exemple : doc 1 : 17 colonnes et je veux mettre un titre couvrant la largeur du document sur la première ligne un autre sur la seconde.
Doc 2 : 12 colonnes et je veux mettre un titre couvrant la largeur du document sur la première ligne un autre sur la seconde.
Avec la meme macro...

Merci

W7/Excel 2010

1 réponse

  1.
    eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour,

    en supposant que tes titres sont au départ en ligne 1 et qu'il faut insérer 2 lignes : 
    Rows("1:2").Insert Shift:=xlDown
[A1].Resize(2, [IV3].End(xlToLeft).Column).HorizontalAlignment = xlCenterAcrossSelection

    J'ai choisi de centrer sur plusieurs cellules plutôt que la fusion de cellules qui embete tôt ou tard.
    Inscrit les titres en A1 et A2.

    eric
    0