Copier mise en forme dans une variable

Fermé
medestrac - 2 mars 2017 à 14:47
 GIL - 3 mars 2017 à 06:33
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 mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
2 mars 2017 à 15:10
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
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 mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
Modifié par ThauTheme le 2/03/2017 à 15:38
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
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