nicolas1984
XLDnaute Nouveau
Bonjour à tous,
J'ai quelques difficultés à recopier des cellules avec mise en forme d'un classeur à un autre en VBA.
Voici mon code :
Où :
J'ai essayé une quantité incroyable de méthodes, le copier/coller semble la plus adaptée (j'aurais préféré un recopiage direct du style FeuilleSource.Rows("7:" & (lpp + 6)).Copy Feuille.Rows("1:1")). Mais malheureusement ça ne fonctionne toujours pas, rien n'est copié dans la destination !
L'un d'entre vous aurait-il une idée svp ?
Là je tourne vraiment en rond !
Merci d'avance
J'ai quelques difficultés à recopier des cellules avec mise en forme d'un classeur à un autre en VBA.
Voici mon code :
Code:
FeuilleSource.Rows("7:" & (lpp + 6)).Select
Selection.Copy
Feuille.Range("A1").Select
ActiveSheet.Paste
- lpp est calculé et est de toute façon >1
- FeuilleSource est défini par Set FeuilleSource = source.Sheets(magasin) et Set source = Excel.Workbooks("EtiquettesLogistique.xlsm") (magasin est bien défini lui aussi, c'est un nom d'onglet)
- De même Feuille est bien défini (je peux écrire dedans sans problème avec .Range() par exemple), mais dans un autre classeur créé par la macro
J'ai essayé une quantité incroyable de méthodes, le copier/coller semble la plus adaptée (j'aurais préféré un recopiage direct du style FeuilleSource.Rows("7:" & (lpp + 6)).Copy Feuille.Rows("1:1")). Mais malheureusement ça ne fonctionne toujours pas, rien n'est copié dans la destination !
L'un d'entre vous aurait-il une idée svp ?
Là je tourne vraiment en rond !
Merci d'avance
Dernière édition: