Discussion :

[number8326200]

Bonsoir a tous

J'ai un souci de recopie
J'ai crée une macro qui recopie un devis dans une nouvelle feuille mais il ne garde pas la mise en page des lignes ni les marges pour l'impression
Sachant que de la feuille source ou se trouve le devis je n'en prend qu'une partie
Le but étant de transformer un devis en facture automatiquement

Merci pour votre aide

[fring]

Bonjour,

La solution la plus simple serait de copier la feuille complète et de supprimer ce qui n'est plus nécessaire par la suite

[number8326200]

j'y ai bien pensé et essayé mais le soucis c'est que cette feuille a des boutons de macros et la suppression ne se fait pas
je n'arrive pas à joindre mon fichier qui ne fais que 50ko ?
merci pour votre aide

[fring]

Si tu veux supprimer tous les contrôles sur la feuille, tu peux faire comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim shp As Shape
 
For Each shp In Sheets("MaFeuille").Shapes
    shp.Delete
Next