• Initiateur de la discussion Initiateur de la discussion abc
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

abc

XLDnaute Impliqué
Bonjour,
J'ai trouvé sur le forum comment copier un tableau sur une autre feuille et qu'il s'ajoute a la suite d'un autre pour en faire une sauvegarde.
Mais comment faire pour que la copie garde la même largeur de colonne dans la feuille 2 ?
J'avais pensé inclure whit mais ...,je patine
Merci d'avance
 

Pièces jointes

Re : Copier un tableau

Bonjour Abc

regarde le code ci dessous, à placer dans un module standard :

Code:
With Sheets(2).Range("A65536").End(xlUp)(2)
Sheets(1).Range("A1").CurrentRegion.Copy
    .PasteSpecial Paste:=xlPasteColumnWidths
    .PasteSpecial Paste:=xlPasteAll
End With

(ok, excel2003 pas sur sur versions antérieure le "xlPasteColumnWidths")

bon après midi
@+
 
Re : Copier un tableau

Bonsoir,
merci pour la réponse.
Le tableau a copier restait actionnée, j'ai ajouté la ligne suivante pour le déactiver.
Public Sub Copie()
With Sheets(2).Range("H65536").End(xlUp)(2)
Sheets(1).Range("A10").CurrentRegion.Copy
.PasteSpecial Paste:=xlPasteColumnWidths
.PasteSpecial Paste:=xlPasteAll


End With
Application.CutCopyMode = False
End Sub
Merci, je vais continuer
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
32
Affichages
1 K
Retour