Copier format police sans le format cellule

ascal44 · 18 Septembre 2007

Bonsoir, voici le code VBA suivant que je voudrais modifier afin de recopier uniquement le format de police sans celui de la cellule :

x = Application.Index(Sheets("Remisage").Range("B6:B109"), _
Application.Match(CDbl(TextBox9.Value), Sheets("Remisage").Range("A6:A109"), 0)).Address
Sheets("Remisage").Range(x).Copy .Range("G" & DerLigne)
Application.CutCopyMode = False

Celà est-il possible ???

Excel-lent · 18 Septembre 2007

Re : Copier format police sans le format cellule

Bjr Ascal44

Voici le code pour recopier uniquement le format de police de la cellule [G12]

Code:

    Range("G12").Select
    Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False

A adapter à ton cas de figure

ascal44 · 19 Septembre 2007

Re : Copier format police sans le format cellule

Merci, mais je ne sais pas comment et où l'intégrer dans mon code !!!

Je débute dans le déchiffrage du VBA.

Copier format police sans le format cellule

ascal44

XLDnaute Occasionnel

Excel-lent

XLDnaute Barbatruc

ascal44

XLDnaute Occasionnel

Discussions similaires

Copier format police sans le format cellule

ascal44

XLDnaute Occasionnel

Excel-lent

XLDnaute Barbatruc

ascal44

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency