Copier mise en forme dans une variable

medestrac -  
 GIL -
Bonjour,

Est-ce que quelqu'un sait copier la mise en forme d'une cellule dans une variable?
Je souhaite copier une sélection dans un tableau en début de macro, puis la recoller en fin de macro. Par contre ça ne copie/colle que les valeurs, pas les mises en forme...
A voir également:

4 réponses

ThauTheme Messages postés 1442 Date d'inscription   Statut Membre Dernière intervention   160
 
Bonjour Medestrac, bonjour le forum,

Selon le code utilisé ça copie aussi le format. Mais comme de code il n'y en a point, je ne peux guère t'en dire plus... M***e !... Voilà que je parle comme un vicomte maintenant !...
0
medestrac
 
Voilà le code en question:
For i = 1 To cfin - cdeb + 1
For j = 1 To lfin - ldeb + 2
TableSelection(j, i) = Cells(j + ldeb - 1, i + cdeb - 1)
Next j
Next i
0
ThauTheme Messages postés 1442 Date d'inscription   Statut Membre Dernière intervention   160
 
Re,

En effet l'utilisation d'un tableau est très rapide mais ne prend pas en compte la mise en forme. Avec ce petit bout de code que tu as daigné fournir c'est tout ce que je peux te dire...
À plus,
ThauTheme
0
GIL
 
Bonjour,

S'il s'agit d'une mise en forme qui ne bouge pas, tu pourrais appliquer le format à la plage copiée avec par exemple :

With Selection
.Font.Bold = True
.interior.color........

End With

Gilles
0