copie de feuilles

[Tyko]

Bjr,

etant donné que j'utilise des feuilles de calcul dans lesquelles des cellules comportent un nombre de caractères > 256 (descriptions). je me retrouve toujours avec des contenus tronqués lors de la copie des ces feuilles ! excel me demande en effet de recopier les données sur la nouvelle feuille !

tout de meme, existerait-il un moyen par VBA de contourner cette restriction ???

merci !

 

[Pascal76]

Bonjour

Tu n'es pas obligé de passer par VBA

Il te suffit non pas de copier ta feuille mais de créer une nouvelle feuille, de sélectionner toutes tes données à l'aide du bouton se trouvant au dessus de la ligne 1 et à gauche de la colonne A puis de copier. Tu sélectionnes ta nouvelle feuille cellule A1 pouis tu fais coller

Bon courage

Pascal

 

[Pascal76]

RE

Si tu le veux par vba voilà un petit code

Sub Newfeuille()

Dim MaFeuille As String, Newfeuille As String

MaFeuille = ActiveSheet.Name
Newfeuille = "Copie " & MaFeuille

Sheets.Add
ActiveSheet.Name = Newfeuille
Sheets(MaFeuille).Cells.Copy Sheets(Newfeuille).Range("A1")

End Sub

Pascal