Copier/coller en gardant la mise en forme du lieu de collage

Bonjour,

Je me permets de vous joindre un fichier pour illustrer mon souci

Voilà, j'ai un code qui va recopier des données dans plusieurs onglets. La macro colle les données dans un seul onglet "BDD" en fonction de la période choisi en cellule J1 de l'onglet BDD

J'aimerai que le copier coller ne garde pas la mise en forme des onglets copier. Et qu'elle coller en en gardant la mise en forme de l'onglet cible (BDD).

De plus, j'aimerai qu'elle recopier pour chaque ligne copier/coller le nom de la période (valeur en J1) et qu'elle fasse de même pour la date et heure d'importation (colonne G).

Merci de votre aide

Amicalement

MAx

Bonjour

Essaie en modifiant cette partie de code :

.Range("B3:F" & Ln).Copy 'Copier coller de la colonne B à F
Bdd.Range("B" & Lnbdd).PasteSpecial Paste:=xlPasteValues
.Range(.Cells(3, x), .Cells(Ln, x)).Copy ' copie colle nb d'opérations
Bdd.Range("H" & Lnbdd).PasteSpecial Paste:=xlPasteValues

Si ok, clique sur le v vert à coté du bouton EDITER lors de ta réponse afin de cloturer le fil

Crdlt

Bonjour

Bonjour Dan

Ma participation

Merci Dan et Banzai64

Après quelques adaptations de vos deux codes ça marche parfaitement !

Rechercher des sujets similaires à "copier coller gardant mise forme lieu collage"